anchor.diff:               (list (cons :excerpt excerpt)))
        (:comment . "Autogenerated by RefBot from link in the target text")
        (:reference . ,reference)
  -     (:flag . '(:custodial :blank)))
  +     (:flag . (:custodial :blank)))
      *system-author-id*))
   
   (defun extract-links-from-target (url)
  
positive.code: 
  (defun get-references-to (url)
    "Returns IDs of opinions that contain a reference to URL."
    (grab-column (liql url 'reference.reference 'opinion)))
  
  (defun get-generated-references-from (url)
    (let ((rid (get-refbot-id)))
  
negative.code:                                     (gethash (car ref) stor)))
              (collect (car ref) ref))))))))
  
  (defun save-new-references (url)
    (loop for (link excerpt) in (find-new-references url)
       do (insert-generated-reference-opinion url link excerpt)))
  