       (text-area "summary")
       [:br]
       (submit-button "save"))))
-
+            
 (defn edit-article
   "Display HTML form to edit an article"
   [id]
   (let [article (articles/get-article id)]
-    (layout "Edit Post"
+    (layout :edit-articles
       (form-to [:post (str "/api/article/" id)]
         [:input {:type "hidden" :name "id" :value (:id article)}]
         [:label "Location:"]

)

(defn star-image [displayed]
  [:img.star {:src "public/i/star.png"
              :title "Unstar it"
              :style (str "display: " (if displayed "inline" "none"))}])
(defn star-empty-image [displayed]
  [:img.star-empty {:src "public/i/star-empty.png"
              :title "Sar it"
              :style (str "display: " (if displayed "inline" "none"))}])
(def delete-image
  [:img.delete {:src "public/i/cross.png" :title "Delete it"}])

(defn header
  "HTML header common to all pages"

  (html
    [:head
      [:title app-name]
      (include-js "/public/j/jquery.js"
                  "/public/j/instapapure.js")
      (include-css "/public/s/instapapure.css")
      "<meta name=viewport content='initial-scale=1.0'>"]
    [:body
        (header title)
