kimendisch/pronomen.lol
0
0
Fork 0
Code Issues Pull Requests Projects Activity

add meta tags needed for twitter preview card. this needs additional cleanup #56

Browse Source
This commit is contained in:
Morgan Astra 2017-03-09 00:27:51 -08:00
parent 414909ac22
commit acbea12b93
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/pronouns/pages.clj
View File

@ -116,6 +116,12 @@
(defn footer-block [] (defn footer-block []
[:footer (usage-block) (contact-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 (defn format-pronoun-examples
[pronoun-declensions] [pronoun-declensions]
(let [sub-objs (map #(s/join "/" (take 2 %)) pronoun-declensions) (let [sub-objs (map #(s/join "/" (take 2 %)) pronoun-declensions)
@ -127,6 +133,11 @@
[:title title] [:title title]
[:meta {:name "viewport" :content "width=device-width"}] [:meta {:name "viewport" :content "width=device-width"}]
[:meta {:name "description" :content (u/strip-markup examples)}] [: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"}]] [:link {:rel "stylesheet" :href "/pronouns.css"}]]
[:body [:body
(header-block title) (header-block title)