anchor.diff:      (cond
         ((is-cached url)
          (if-let ((links (grab-links url)))
  -         links
  +         (return-from extract-links-from-target links)
            (setf text (grab-text url))))
         ((opinion-exists-p url)
          (setf text (assoc-cdr :comment (opinion-exists-p url))))
  
positive.code:                                     (gethash (car ref) stor)))
              (collect (car ref) ref))))))))
  
  (defun generate-new-references (url)
    (loop for (link excerpt) in (find-new-references url)
       do (insert-generated-reference-opinion url link excerpt)))
  
negative.code:              (list (cons :excerpt excerpt)))
       (:comment . "Autogenerated by RefBot from link in the target text")
       (:reference . ,reference)
       (:flag . (:custodial :blank)))
     *system-author-id*))
  
  (defun extract-links-from-target (url)
  