anchor.diff:  ;;; Configuration:
   ;;;
   
  -(defvar *server*   "irc.freenode.org"
  +(defvar *server*   "irc.libera.chat"
     "The fqdn of the IRC server.")
   (defvar *nickname* "botihn"
     "The nickname of the botihn user.")
  
positive.code: (defun blacklistedp (story)
    (loop
      :for (label kind regexp) :in *blacklist*
      ;; If there is an error, perhaps we should remove the enrty in the *blacklist*…
        :thereis (ignore-errors (scan regexp
                                      (ecase kind
                                        (:title (story-title story))
  
negative.code:   "The current IRC server connection.")
  (defvar *botpass*  "1234")
  
  
  (defvar *blacklist* '()
    "A list of lists (label :url \"regex\") or (label :title \"regexp\") used to match either the url or the title of the HN news.
  Matchedp news are not transmitted on irc.
  