statistics template fixed

src/notehub/views.clj

@@ -83,16 +83,17 @@
   (let [page-title (get-message :statistics)
         info (assoc stats :publisher publisher)]
     (layout :no-js {} page-title
-            [:h2.central-element note-title]
+            [:div.central-element.helvetica {:style "width: 80%"}
-            [:h3.central-element.helvetica page-title]
+             [:h2 note-title]
-            [:table#stats.helvetica.central-element
+             [:h3.helvetica page-title]
-             (map
+             [:table#stats
-               #(when-let [v (% info)]
+              (map
-                 [:tr
+                #(when-let [v (% info)]
-                  [:td (str (get-message %) ":")]
+                   [:tr
-                  [:td (if (or (= % :published) (= % :edited))
+                    [:td (str (get-message %) ":")]
-                         (str (java.util.Date. (Long/parseLong v))) v)]])
+                    [:td (if (or (= % :published) (= % :edited))
-               [:published :edited :publisher :views])])))
+                           (str (java.util.Date. (Long/parseLong v))) v)]])
+                [:published :edited :publisher :views])]])))
 
 (defn note-update-page [note-id note]
   (input-form "/update-note"
@@ -113,7 +114,7 @@
           (let [urls {:short-url short-url
                       :notehub "/"}
                 links (map #(link-to
-                             (urls % (str (:longURL note) "/" (name %)))
+                              (urls % (str (:longURL note) "/" (name %)))
-                             (get-message %))
+                              (get-message %))
                            [:notehub :stats :edit :export :short-url])]
             [:div#footer (interpose [:span.middot "·"] links)])))