   (html
     [:head
       [:title app-name]
-      (include-js "public/j/jquery.js"
-                  "public/j/instapapure.js")
-      (include-css "public/s/instapapure.css")
+      (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)

      (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"
      (form-to [:post (str "/api/article/" id)]
        [:input {:type "hidden" :name "id" :value (:id article)}]
        [:label "Location:"]

(defn create-article
  "Display HTML form to create a new article"
  []
  (layout :new-article
    (form-to [:get "/api/article/new"]
      [:label "Location:"]
      [:input {:type "text" :name "location"}]
