   } catch(err) {}</script>"
 )
 
+(def nav-separator "&nbsp;&#9826;&nbsp;")
+
 (defn star-image [displayed]
   [:img.star {:src "/public/i/star.png"
               :title "Unstar it"

(def delete-image
  [:img.delete {:src "/public/i/cross.png" :title "Delete it"}])

(defn header
  "HTML header common to all pages"
  [title]
  (html
    [:h1 app-name]
    [:div.nav
      (if (= title :unread)
        [:span.current "Unread"]
        (link-to "/" "Unread"))
      "&nbsp;&#9826;&nbsp;"
      (if (= title :starred)
        [:span.current "Starred"]
        (link-to "/starred" "Starred"))
      "&nbsp;&#9826;&nbsp;"
      (if (= title :archive)
        [:span.current "Archive"]
        (link-to "/archive" "Archive"))]))

(defn footer
  "HTML footer common to all pages"

    [:div.footer
      [:div.bookmarklet
        (link-to "/article" "New Article")
        nav-separator
        "Drag the bookmarklet: "
        (link-to bookmarklet "Read later")]
      [:div.signout
