anchor.diff:                                          'hilited-text-id
                                           (strcat "hilited-text-" id))))))))
   
  -    (defun %make-opin-popups (opinions props)
  -      (loop for op in opinions
  -         for (x y) in (opinion-fan (length opinions))
  -         collect
  -           (psx (:mini-opinion :... props
  -                               :opinion (@ op 0)
  -                               :opinions (chain op (slice 1))
  -                               :top (+ y (lisp *unit-string*))
  -                               :left (+ x (lisp *unit-string*))
  -                               :key (unique-id)))))
  -
       (defun %get-replies-count (opinions props)
         (let ((total 0))
           (dolist (op opinions)
  
positive.code:           (:target-title
             :key 0
             :... (@ this props)
             " "
             (:general-opinion-knobdule
              :key 1
              :... (@ this props)
              :focus (state focus)
              :opinions (prop opinions)
              :tree-address (list)
              :focusfunc (@ this focus-func)))
            (:h3
             :style (create 'font-style "italic" :background "lightgrey")
             :key 2
  
negative.code:   (ps
  
      (setf tool-tip (@ (require "react-portal-tooltip") default))
  
      (defun focus-p (props?)
        (let ((tad (@ props? tree-address))
  