Explicitly declare html5. Stupid.

gigasquid · Dec 30, 2011 · 595f648 · 595f648
1 parent 9328701
commit 595f648
Showing 1 changed file with 33 additions and 33 deletions.
diff --git a/src/refheap/views/common.clj b/src/refheap/views/common.clj
@@ -1,44 +1,44 @@
 (ns refheap.views.common
-  (:use [noir.core :only [defpartial]]
-        [hiccup.page-helpers :only [include-css include-js link-to image]]
+  (:use [hiccup.page-helpers :only [html5 include-css include-js link-to image]]
         [clavatar.core :only [gravatar]])
   (:require [noir.session :as session]
             [refheap.models.paste :as paste]))
 
 (defn avatar [email size]
   (image (gravatar email :size size)))
 
-(defpartial layout [& content]
-  [:head
-   [:title "The Refusal Heap"]
-   (include-css "/css/refheap.css")
-   (include-css "/css/native.css")
-   (include-js  "/js/jquery-1.7.1.min.js")
-   (include-js  "https://browserid.org/include.js")
-   (include-js  "/js/refheap.js")]
-  [:body
-   [:div#header
-    [:a#site {:href "/paste"} "The Refusal Heap"]
-    [:div.headerlinks
-     (link-to "/pastes" "All Pastes")
-     (link-to "/about" "About")]
-    [:div#useri.headerlinks
-     (if-let [user (and (bound? #'session/*noir-session*)
-                        (:username (session/get :user)))]
-       [:div
-        (link-to (str "/users/" user) user)
-        (link-to "/users/logout" "logout")]
-       [:img#signin {:src "/img/browserid.png"}])]]
-   [:div#content
-    [:div#container content]
-    [:div#footer
-     [:p.centered
-      (link-to "https://github.com/Raynes/refheap" "Refheap")
-      " is powered by " (link-to "http://clojure.org" "Clojure") ", "
-      (link-to "http://webnoir.org" "Noir") ", "
-      (link-to "http://mongodb.org" "MongoDB") ", "
-      (link-to "http://pygments.org/" "Pygments")
-      " and the cries of children the world over."]]]])
+(defn layout [& content]
+  (html5
+   [:head
+    [:title "The Refusal Heap"]
+    (include-css "/css/refheap.css")
+    (include-css "/css/native.css")
+    (include-js  "/js/jquery-1.7.1.min.js")
+    (include-js  "https://browserid.org/include.js")
+    (include-js  "/js/refheap.js")]
+   [:body
+    [:div#header
+     [:a#site {:href "/paste"} "The Refusal Heap"]
+     [:div.headerlinks
+      (link-to "/pastes" "All Pastes")
+      (link-to "/about" "About")]
+     [:div#useri.headerlinks
+      (if-let [user (and (bound? #'session/*noir-session*)
+                         (:username (session/get :user)))]
+        [:div
+         (link-to (str "/users/" user) user)
+         (link-to "/users/logout" "logout")]
+        [:img#signin {:src "/img/browserid.png"}])]]
+    [:div#content
+     [:div#container content]
+     [:div#footer
+      [:p.centered
+       (link-to "https://github.com/Raynes/refheap" "Refheap")
+       " is powered by " (link-to "http://clojure.org" "Clojure") ", "
+       (link-to "http://webnoir.org" "Noir") ", "
+       (link-to "http://mongodb.org" "MongoDB") ", "
+       (link-to "http://pygments.org/" "Pygments")
+       " and the cries of children the world over."]]]]))
 
 (defn page-buttons [n page]
   [:div.centered