anchor.diff:                 (create :type :selection
                          :range range
                          :excerpt (getprop excerpt 0)
  -                       :offset (getprop excerpt 1))))))))
  +                       :offset (getprop excerpt 1))))
  +            (funcall
  +             (prop dispatch)
  +             (create :type :selection
  +                     :range false :excerpt "" :offset 0))))))
   
       (defun %get-replies-count (opinions props)
         (let ((total 0))
  
positive.code:               "left")
            "left"))
  
      (defun immediate-children-ids (opinions)
        (mapcar (lambda (opin)
                  (@ (getprop opin 0) id))
                opinions))
  
      (defun %find-parent-hilited (element)
        (if element
  
negative.code:         (create :id (strcat "hilited-text-" (unique-id))))
        selection-change
        (lambda (ev)
          (when (prop dispatch)
            (if (is-selection-in-single-hilited-text? (chain rangy (get-selection)))
              (let* ((textel (chain document (get-element-by-id (state id))))
                     (range (chain rangy (get-selection) (get-range-at 0)
                                   (to-character-range textel)))
  