MK
https://drive.google.com/file/d/1kK9d_wJcjdR_FZdO8e0WxrqFXYkjVjzj/view?usp=sharing
@igrishaev написал книжку про кложуру
https://grishaev.me/clj-book-preorder/
@esseswann запинь, пожалуйста
Size: a a a
MK
((
MK
ST
DK
MK
MK
I
handle env msg = do
case getCommand msg of
Just "/cat" -> do
id <- env.telegram.sendVideo msg.chat_id "http://site.com/video.mp4"
env.delay $ Milliseconds 15_000.0
env.telegram.removeKeyboard id
...
{ delay ∷ Milliseconds -> Aff Unit
, telegram ∷
{ removeKeyboard :: Int -> Int -> Aff Unit
, sendVideo :: String -> String -> Aff Int } }
->
{ chat_id ∷ Int, text :: String }
->
Aff Unit
RN
p
DF
MP
DF
DF
MP
DF
AG
A
AG