anchor.diff:        (thread-row-dropdown id op-id :locked locked :stickied stickied)
         (print-link-to-thread id subject :locked locked :stickied stickied)
         (if (following-thread-p id (get-session-var 'userid) (real-remote-addr))
  -          (:a :href (format nil "b/unfollow?thread=~d" id)
  +          (:a :href (format nil "b/unfollow?thread=~d&f=~a"
  +                            id (get-parameter "f"))
                 :title "Unfollow thread"
                 :style "float: right; padding-right: 5px;"
                 (:b :class "glyphicon glyphicon-eye-close")))
  
positive.code:                                             num-of-pages)
                                num-of-pages))))))))))
  
  ;;; FIXME: i have no idea how password encryption works so i just copied this
  ;;;        from somewhere, probably needs improved
  (defconstant +hash-size+ 32)
  
negative.code:       )"
       (user-id thread-id))))
  
  (defun anonymous-follow-thread (thread-id user-ip)
    (unless (ip-following-thread-p thread-id user-ip)
      (execute-query-modify
       "INSERT INTO following (
  