about summary refs log tree commit diff
diff options
context:
space:
mode:
authorMorgan Astra <m@morganastra.me>2017-03-09 00:27:51 -0800
committerMorgan Astra <m@morganastra.me>2017-03-09 00:27:51 -0800
commitacbea12b93ddfa47cf9f1c1ebf3b339ea15977c6 (patch)
tree544d8d12fe5829f1de042546d87bce0e34c72a59
parent414909ac229ce42945e2ca834805f00d16b34bd0 (diff)
add meta tags needed for twitter preview card. this needs additional cleanup #56
-rw-r--r--src/pronouns/pages.clj11
1 files changed, 11 insertions, 0 deletions
diff --git a/src/pronouns/pages.clj b/src/pronouns/pages.clj
index f9939c3..b9ac11b 100644
--- a/src/pronouns/pages.clj
+++ b/src/pronouns/pages.clj
@@ -116,6 +116,12 @@
 (defn footer-block []
   [:footer (usage-block) (contact-block)])
 
+;; <meta name="twitter:card" content="summary" />
+;; <meta name="twitter:site" content="@flickr" />
+;; <meta name="twitter:title" content="Small Island Developing States Photo Submission" />
+;; <meta name="twitter:description" content="View the album on Flickr." />
+;; <meta name="twitter:image" content="https://farm6.staticflickr.com/5510/14338202952_93595258ff_z.jpg" />
+
 (defn format-pronoun-examples
   [pronoun-declensions]
   (let [sub-objs (map #(s/join "/" (take 2 %)) pronoun-declensions)
@@ -127,6 +133,11 @@
        [:title title]
        [:meta {:name "viewport" :content "width=device-width"}]
        [:meta {:name "description" :content (u/strip-markup examples)}]
+       [:meta {:name "twitter:card" :content (u/strip-markup examples)}]
+       [:meta {:name "twitter:site" :content "@morganastra"}]
+       [:meta {:name "twitter:title" :content title}]
+       [:meta {:name "twitter:description" :content (u/strip-markup examples)}]
+       [:meta {:name "twitter:image" :content "https://pronoun.is/purple-flag64.png"}]
        [:link {:rel "stylesheet" :href "/pronouns.css"}]]
       [:body
        (header-block title)