anchor.diff:             (group (db groupid))
              (next (or (post-parameter "next")
                        (url-compose "/settings/communication"
  -                          ;"groupid" groupid
  +                          "groupid" groupid
                             "type" unsub-type
                             "email" unverified-email
                             "k" k))))
  
positive.code:       (:notify-blog
          (unsub "You are now unsubscribed from receiving new articles from the Kindista blog"))
        (:notify-message
          (unsub  "You are now unsubscribed from receiving notificaitons when someone sends you a message or responds to your offers/requests"))
        (:notify-new-contact
          (unsub "You are now unsubscribed from receiving notificaitons when someone adds you to their list of contacts"))
        (:notify-reminders
  
negative.code:           (:h2 "Please let us know what types of information you would like to be notified about")
            (:p "Notifications will be sent to your primary email address: "
             (:strong (str (car (getf unsub-user :emails)))))
            (if groups
              (str (settings-identity-selection-html
                     (or groupid unsub-id)
                     groups
                     :userid unsub-id
                     :url "/settings/notifications"))
              (str (settings-unsubscribe-all)))
            (str (settings-notifications :user unsub-user
                                         :userid unsub-id
                                         :group group
  