anchor.diff:  (defun send-photo (b chat-id photo &key caption disable-notification reply reply-markup)
     "https://core.telegram.org/bots/api#sendphoto"
     (let ((options
  -         (list 
  +         (list
             (cons :chat_id chat-id)
             (cons :photo photo))))
          (when caption (nconc options `((:caption . ,caption))))
  
positive.code: (defun send-document (b chat-id document &key caption disable-notification reply reply-markup)
    "https://core.telegram.org/bots/api#senddocument"
    (let ((options
           (list 
            (cons :chat_id chat-id)
            (cons :document document))))
         (when caption (nconc options `((:caption . ,caption))))
  
negative.code: (defun get-chat (b chat-id)
    "https://core.telegram.org/bots/api#getchat"
    (let ((options
           (list
            (cons :chat_id chat-id))))
          (make-request b "getChat" options)))
  
  (defun get-chat-administrators (b chat-id)
    "https://core.telegram.org/bots/api#getchatadministrators"
    (let ((options
           (list
            (cons :chat_id chat-id))))
          (make-request b "getChatAdministrators" options)))
  
  (defun get-chat-members-count (b chat-id)
    "https://core.telegram.org/bots/api#getchatmemberscount"
    (let ((options
           (list
            (cons :chat_id chat-id))))
          (make-request b "getChatMembersCount" options)))
  
  (defun get-chat-member (b chat-id user-id)
    "https://core.telegram.org/bots/api#getchatmember"
    (let ((options
           (list
            (cons :chat_id chat-id)
            (cons :user_id user-id))))
          (make-request b "getChatMember" options)))
  