anchor.diff:    (sleep 5)
     (logging "Connecting to IRC")
     (setf (bot-irc-connection bot)
  -        (connect :nickname "MidyMidyTGBot"
  +        (connect :nickname (bot-irc-name bot)
                    :server "irc.freenode.net"))
     (logging "JOIN CHANNEL")
     (join (bot-irc-connection bot) (bot-irc-channel bot))
  
positive.code:                   (sleep 2)))))))
  
  ;;;;------------------------------------------------
  
  (defparameter *tg-loop* nil)
  (defparameter *irc-watcher* nil)
  
  (defun creat-watcher-f (bot)
    (logging "Create IRC watcher")
  
negative.code:   (tryto (sb-thread:terminate-thread (bot-thread-irc-watcher bot)))
    (tryto (irc-shutdown bot)))
  
  