anchor.diff:  
   (defhtml index-buttons-mobile ()
     (:input :type "button"
  -          :class "btn btn-default btn-sm threads reset"
  +          :class "btn btn-default btn-sm threads reset-tags"
             :onclick "window.location='b/reset-tags'"
             :value "Reset")
     (:input :type "submit"
  
positive.code:        ,@body)))
  
  (defhtml rightlinks (rightlinks sociallinks)
    (:div :class "header rightlinks"
          (rightlinks-desktop rightlinks sociallinks)
          (rightlinks-mobile rightlinks sociallinks)))
  
  (defhtml rightlinks-desktop (rightlinks sociallinks)
    (desktop-only
      (:div
       (:div (generate-sociallinks sociallinks)
             (generate-rightlinks rightlinks))
  
       (login-links-desktop))))
  
  (defhtml rightlinks-mobile (rightlinks sociallinks)
    (mobile-only
      (:div
       (:div :class "btn-group mobile header rightlinks"
             (:a :class "btn btn-default btn-sm dropdown-toggle"
                 :data-toggle "dropdown"
                 "Menu " (:span :class "caret"))
             (:ul :class "dropdown-menu pull-right"
                  (generate-dropdown-links rightlinks)
                  (generate-dropdown-links-social sociallinks)))
       (:br)
       (:br)
       (login-links-mobile))))
  
  (defhtml login-links-desktop ()
    (if (logged-in-p)
  
negative.code: ;;; page skeleton
  (eval-when (:compile-toplevel :load-toplevel :execute)
    (defparameter *header*
      '((row :class "header banner"
         (col 12 :class "header text"
  
          ;; logo and slogans
          (:span :class "hidden-xs"
                 (:a :href "/"
                     (:img :class "header logo" :src *logo-path*))
                 (if *slogans*
                     (:b :class "hidden-sm header slogan"
                         (:raw (random-elt *slogans*)))))
          (:span :class "visible-xs-inline"
                 (:a :href "/"
                     (:img :class "header logo small" :src *small-logo-path*)))
  
          ;; right links
          (rightlinks *rightlinks* *sociallinks*))))))
  
  ;;; The basic format that every viewable page will follow.
  (defmacro standard-page ((&key title) &body body)
  