anchor.diff:            (bot-halt)
             (error "BOT HALT!"))
           (progn
  -          (tryto (remove-all-hooks *irc-connection*)
  -                 (quit *irc-connection*))
  +          (tryto (remove-all-hooks *irc-connection*))
  +          (tryto (quit *irc-connection*))
             (sleep 5)
             (setf *irc-connection*
                   (connect :nickname "MidyMidyTGBot"
  
positive.code:                     (lambda (msg)
                        (funcall *tg-message-sender*
                                 (msgstr-irc->tg msg))))
            (start-background-message-handler *irc-connection*)
            (if callback
                (funcall callback)))))
  
negative.code: (progn
    (defparameter *irc-channel* "#midymidybot")
    (defparameter *irc-connection* nil)
  
    (defparameter *pong*)
    (setf *pong* 0)
  
    (defun correct-cljson-surrogate-pairs (wrong-string)
      (with-output-to-string (out)
  