anchor.diff:                    (title (or (post-parameter-string "title")
                                (getf item :title)))
                     (custom-url (or (when (getf *user* :admin)
  -                                    (hyphenate
  -                                      (post-parameter-string "custom-url")))
  +                                    (awhen (post-parameter-string "custom-url")
  +                                      (hyphenate it)))
                                     (getf item :custom-url)))
                     (details (or (post-parameter-string "details")
                                  (getf item :details)))
  
positive.code:          (when (getf *user* :admin)
             (htm
               (:div :class "long"
                 (:label :for "custom-url" "Custom Url")
                 (:input :type "text"
                         :id "custom-url"
                         :name "custom-url"
  
negative.code:                                        longitude
                                         "location" address
                                         "title" title
                                         "custom-url" custom-url
                                         "details" details
                                         "date" date
                                         "time" time
  