diff options
author | Morgan Astra <m@morganastra.me> | 2016-09-20 16:17:58 -0700 |
---|---|---|
committer | Morgan Astra <m@morganastra.me> | 2016-09-20 16:17:58 -0700 |
commit | 93c37971682cbcbda3139c7e8a47ca21311f8947 (patch) | |
tree | 898f0fb63cc9552516e4cfe5cf9515deaa68058b /src | |
parent | 364552f49a372eb223f62a319dc63768451f7b94 (diff) |
add 'section' CSS class for repeated declarations
Diffstat (limited to 'src')
-rw-r--r-- | src/pronouns/pages.clj | 15 |
1 files changed, 7 insertions, 8 deletions
diff --git a/src/pronouns/pages.clj b/src/pronouns/pages.clj index da6d46e..f9fde11 100644 --- a/src/pronouns/pages.clj +++ b/src/pronouns/pages.clj @@ -59,7 +59,7 @@ ".")) (defn title-block [title] - [:div {:class "title"} + [:div {:class "section title"} [:h1 title]]) (defn examples-block @@ -68,7 +68,7 @@ header-str (str "Here are some usage examples for my " sub-obj " pronouns")] - [:div {:class "examples"} + [:div {:class "section examples"} [:p [:h2 header-str]] (subject-example subject) (object-example object) @@ -77,7 +77,7 @@ (reflexive-example subject reflexive)])) (defn about-block [] - [:div {:class "about"} + [:div {:class "section about"} [:p "Full usage: " [:tt "http://pronoun.is/subject-pronoun/object-pronoun/possessive-determiner/possessive-pronoun/reflexive"] " displays examples of your pronouns."] @@ -86,7 +86,7 @@ (defn contact-block [] (let [twitter-name (fn [handle] (href (str "https://www.twitter.com/" handle) (str "@" handle)))] - [:div {:class "contact"} + [:div {:class "section contact"} [:p "Written by " (twitter-name "morganastra") @@ -131,8 +131,7 @@ [:li (href link label)])) (defn front [] - (let [blah (println *pronouns-table*) - abbreviations (u/abbreviate *pronouns-table*) + (let [abbreviations (u/abbreviate *pronouns-table*) links (map make-link abbreviations) title "Pronoun Island"] (html @@ -143,7 +142,7 @@ [:link {:rel "stylesheet" :href "/pronouns.css"}]] [:body (title-block title) - [:div {:class "table"} + [:div {:class "section table"} [:p "pronoun.is is a www site for showing people how to use pronouns in English."] [:p "here are some pronouns the site knows about:"] [:ul links]]] @@ -159,7 +158,7 @@ [:link {:rel "stylesheet" :href "/pronouns.css"}]] [:body (title-block title) - [:div {:class "examples"} + [:div {:class "section examples"} [:p [:h2 (str "We couldn't find those pronouns in our database." "If you think we should have them, please reach out!")]]] (about-block) |