anchor.diff:    (run-modifiers)
     (save-flag)
     (post-flag)
  -  (when (enabledp)
  +  (when (and (enabledp) (directional-p))
       (dolist (ref (wf/ipfs:opinion-references (get-opinion)))
         (vote-wrong ref))))
   
  
positive.code:   (when (parent-is-root-p)
        (post-error "Target is not an opinion"))
    (post-flag)
    (when (approvedp)
      (disable-parent)))
  
  (defflag scsc::custodial-offtopic
  
negative.code:   (run-modifiers)
    (save-flag)
    (post-flag)
    (when (and (enabledp) (directional-p))
      (dolist (ref (wf/ipfs:opinion-references (get-opinion)))
        (vote-right ref))))
  
  