|
@@ -134,6 +134,7 @@
|
|
|
(def-message-handler ofd-handler (-10)
|
|
(def-message-handler ofd-handler (-10)
|
|
|
(let ((parsed (parse-qt *text*)))
|
|
(let ((parsed (parse-qt *text*)))
|
|
|
(when parsed
|
|
(when parsed
|
|
|
|
|
+ (telegram-send-chat-action *chat-id* "typing")
|
|
|
(let ((cheque (apply #'receive parsed)))
|
|
(let ((cheque (apply #'receive parsed)))
|
|
|
(if cheque
|
|
(if cheque
|
|
|
(let ((ledger-package (find-package :chatikbot.plugins.ledger))
|
|
(let ((ledger-package (find-package :chatikbot.plugins.ledger))
|