anchor.diff:        nil))
   
   (defun is-authorized-to-approve/reject (user)
  -  (find user *approve-reject-authorized-accounts* :test #'string-equal))
  +  (member user *approve-reject-authorized-accounts* :test #'string-equal))
   
   (defun is-authorized-to-vote (user)
  -  (find user *vote-authorized-accounts* :test #'string-equal))
  +  (member user *vote-authorized-accounts* :test #'string-equal))
   
   (defun valid-status (status)
     (not (string-equal status "committed")))
  
positive.code:                         (string-equal action (getf s :|action|)))
                         (list (string-trim '(#\Space) (getf s :|params|)))))
                   suggestions)))
      (find trimmed-entry entries :test #'string=)))
  
  (defun setup-templates ()
    (closure-template:with-user-functions
  
negative.code:   "Helper function to be called from the TEMPLATE code.  It returns
  CHECKED in case TERM belongs to LISP; nil otherwise.  This is useful
  in dealing with checkboxes."
    (if (member term list :test #'string=)
        "checked"
        nil))
  
  