anchor.diff:                  (declare (ignore pubid))
                   (when (puri:uri= sysid
                                    (puri:parse-uri
  -                                  "https:///bugzilla.dtd"))
  +                                  "https://g.interna/bugzilla.dtd"))
                     (open "data/bugzilla.dtd" :element-type '(unsigned-byte 8)))))
            (let* ((doc (cxml:parse response
                                    (cxml-dom:make-dom-builder)
  
positive.code:     (bugzilla-login))
    (multiple-value-bind (response status headers)
        (drakma:http-request
         (format nil "https:///show_bug.cgi?ctype=xml&id=~a" bug)
         :cookie-jar *bugzilla-cookies*)
      (cond
        ((/= status 200)
  
negative.code: 
  (defun bugzilla-login ()
    (let ((creds (authentication-credentials "")))
      (drakma:http-request "https://g.interna/index.cgi"
                           :method :post
                           :parameters `(("Bugzilla_login" . ,(getf creds :login))
                                         ("Bugzilla_password" . ,(getf creds :password)))
  