anchor.diff:                               (msgstr-tgimageasfile->irc
                                 bot update)
                                (if (jget :document
  -                                       (jget :message update))
  +                                       (tg-get-message update))
                                    "[ file ]" nil))))
             (condition (e)
               (logging
  
positive.code:                 bot
                  (jget :file--id
                        (jget :document
                              (jget :message update))))))
               (url
                (with-input-from-string
                    (stream (upload-binary-file img-vector))
                  (read-line stream)))
               (caption (jget :caption (jget :message update))))
          (concatenate 'string
                       "[ " url " ] " (if caption caption)))))
  
  
negative.code:     (if hook (funcall hook (car text-lst)))))
  
  (defun process-tg-msg (bot update)
    (push update *update-log*)
    (if (and (tg-is-message? update) ; don't care about other data
             (tg-is-our-chat? bot update)) ; don't care other's data
        ;; one-line: reply, photo, file, sticker
  