Explorar o código

[macros] Fix *from*

Innokentii Enikeev %!s(int64=4) %!d(string=hai) anos
pai
achega
47d855c79e
Modificáronse 1 ficheiros con 2 adicións e 1 borrados
  1. 2 1
      macros.lisp

+ 2 - 1
macros.lisp

@@ -25,7 +25,8 @@
 (defmacro with-parsed-message (message &body body)
 (defmacro with-parsed-message (message &body body)
   `(let* ((*message* ,message)
   `(let* ((*message* ,message)
           (*message-id* (agets *message* "message_id"))
           (*message-id* (agets *message* "message_id"))
-          (*from-id* (agets *message* "from" "id"))
+          (*from* (agets *message* "from"))
+          (*from-id* (agets *from* "id"))
           (*chat-id* (agets *message* "chat" "id"))
           (*chat-id* (agets *message* "chat" "id"))
           (*text* (agets *message* "text")))
           (*text* (agets *message* "text")))
      ,@body))
      ,@body))