|
@@ -208,7 +208,7 @@
|
|
|
|
|
|
|
|
(defun handle-cmd-rates (chat-id message-id args)
|
|
(defun handle-cmd-rates (chat-id message-id args)
|
|
|
(log:info "handle-cmd-rates" chat-id message-id args)
|
|
(log:info "handle-cmd-rates" chat-id message-id args)
|
|
|
- (let (rates (get-rates))
|
|
|
|
|
|
|
+ (let ((rates (get-rates)))
|
|
|
(telegram-send-message chat-id
|
|
(telegram-send-message chat-id
|
|
|
(format nil "Зеленый ~A, гейро ~A" (cdar rates) (cdadr rates)))))
|
|
(format nil "Зеленый ~A, гейро ~A" (cdar rates) (cdadr rates)))))
|
|
|
|
|
|
