diff --git a/src/NoteHub/views/common.clj b/src/NoteHub/views/common.clj index eab6ff2..6d5dd83 100644 --- a/src/NoteHub/views/common.clj +++ b/src/NoteHub/views/common.clj @@ -46,7 +46,10 @@ :font-size :1.3em) (rule "article" :font-family :Georgia - :font-size :1.2em) + :font-size :1.2em + (rule "& > h1:first-child" + :text-align :center + :margin :2em)) (rule "*:focus" :outline [:0px :none :transparent]) (rule "textarea" diff --git a/src/NoteHub/views/pages.clj b/src/NoteHub/views/pages.clj index ecce3a4..59894b2 100644 --- a/src/NoteHub/views/pages.clj +++ b/src/NoteHub/views/pages.clj @@ -1,6 +1,8 @@ (ns NoteHub.views.pages (:require [NoteHub.views.common :as common]) - (:use [noir.core :only [defpage]] + (:use + [clojure.string :rename {replace sreplace} :only [trim split replace]] + [noir.core :only [defpage]] [hiccup.form]) (:import [org.pegdown PegDownProcessor])) @@ -23,6 +25,7 @@ ; Actions. (defpage [:post "/preview-note"] {:keys [draft]} - (common/layout "Preview of ..." - [:article.central-body - (.markdownToHtml (PegDownProcessor.) draft)])) + (let [get-title (comp trim #(sreplace % "#" "") first #(split % #"\n"))] + (common/layout (get-title draft) + [:article.central-body + (.markdownToHtml (PegDownProcessor.) draft)])))