anchor.diff:                                              :time time
                                               :text text))
                     (gratitude-url (format nil "/gratitude/~A" new-id))
  -                  (facebook-recipients))
  +                 ; (facebook-recipients)
  +                  )
   
   
                (when (and (getf *user* :fb-link-active)
                           (getf *user* :fb-id)
                           (post-parameter "publish-facebook"))
                  (notice :new-facebook-action :item-id new-id)
  -               (dolist (subject-id g-subjects)
  -                 (let ((subject-data (db subject-id)))
  -                   (when (and (getf subject-data :fb-id)
  -                              (getf subject-data :fb-link-active)
  -                              (check-facebook-permission :user-friends
  -                                                         subject-id))
  -                     (push subject-id facebook-recipients)))))
  +              ;; Tagging is convoluted until Facebook changes it's API to allow apps to pass
  +              ;; FB user ids to tag an item. Now they only pass a special token that prevents
  +              ;; us from verifying that a gratitude recipient is also a facebook friend.
  +
  +              ;(dolist (subject-id g-subjects)
  +              ;  (let ((subject-data (db subject-id)))
  +              ;    (when (and (getf subject-data :fb-id)
  +              ;               (getf subject-data :fb-link-active)
  +              ;               (check-facebook-permission :user-friends
  +              ;                                          subject-id))
  +              ;      (push subject-id facebook-recipients))))
  +               )
   
                (awhen on-id
                  (let* ((inventory-result (gethash on-id *db-results*))
  
positive.code:                              :description (getf data :text)
                               :image (awhen (first (getf data :images))
                                        (get-image-thumbnail it 1200 1200)))
                 :selected (awhen (get-parameter-string "menu") it)))))
      (cond
        ((and data (not *user*))
         gratitude-page)
  
negative.code:       ((not self-author-p)
         (permission-denied))
  
        ;; Tagging is convoluted until Facebook changes it's API to allow apps to pass
        ;; FB user ids to tag an item. Now they only pass a special token that prevents
        ;; us from verifying that a gratitude recipient is also a facebook friend.
  
       ;((not (first fb-user-friends-permission))
       ; (facebook-friends-permission-html
       ;       :redirect-uri (strcat "gratitude/" id)
       ;       :re-request (eql (second fb-user-friends-permission) :declined)
       ;       :cancel-link (strcat "gratitude/" id)
       ;       :fb-gratitude-subjects possible-fb-friends-to-tag))
  
       ;(possible-fb-friends-to-tag
       ; (tag-facebook-friends-html
       ;   :gratitude-id id
       ;   :fb-gratitude-subjects (mapcar (lambda (id) (cons (db id :name)
       ;                                                     id))
       ;                                  possible-fb-friends-to-tag)))
        (t (not-found)))))
  
  (defun post-gratitude
    (id
     &aux (url (strcat "/gratitude/" id))
         ;(friends-to-tag (when (post-parameter "tag-friends")
         ;                  (post-parameter-integer-list "tag-fb-friend")))
         )
    (require-user (:require-active-user t :allow-test-user t)
      (setf id (parse-integer id))
      (aif (db id)
  