diff options
author | "Vincent Ambo ext:(%22) <tazjin@gmail.com> | 2013-05-05T18·34+0200 |
---|---|---|
committer | "Vincent Ambo ext:(%22) <tazjin@gmail.com> | 2013-05-05T18·34+0200 |
commit | d7cce6cb413a3a1067ef4e6c72107a21983453a4 (patch) | |
tree | 65103ea5db5172fc54ef2dd0c63a2099407753b1 | |
parent | 11a51f6abdef96a9c8e49ee7bb23e96aadb55276 (diff) |
* more bootstrap-related fixes, nearing completion
* version bumped to 4.0
-rw-r--r-- | TazBlog.cabal | 2 | ||||
-rw-r--r-- | src/Blog.hs | 22 | ||||
-rw-r--r-- | src/Locales.hs | 4 |
3 files changed, 15 insertions, 13 deletions
diff --git a/TazBlog.cabal b/TazBlog.cabal index 1295363f60e1..295d4e8ae36f 100644 --- a/TazBlog.cabal +++ b/TazBlog.cabal @@ -1,5 +1,5 @@ Name: TazBlog -Version: 3.5 +Version: 4.0 Synopsis: Tazjin's Blog License-file: LICENSE Author: Vincent Ambo diff --git a/src/Blog.hs b/src/Blog.hs index 8a7d49b9218a..4c8d19aa310b 100644 --- a/src/Blog.hs +++ b/src/Blog.hs @@ -138,7 +138,7 @@ $forall entry <- elist <br> #{linkText $ length $ comments entry} #{cHead $ lang entry} - <div .span10> + <div .span10 .entry> $if (isEntryMarkdown entry) ^{renderEntryMarkdown $ append " " $ btext entry} $else @@ -158,19 +158,21 @@ $maybe links <- footerLinks showLinks :: Maybe Int -> BlogLang -> Html showLinks (Just i) lang = [shamlet| - $if ((>) i 1) - <div class="centerbox"> - <a href=#{nLink $ succ i}>#{backText lang} - \ -- # - <a href=#{nLink $ pred i}>#{nextText lang} - $elseif ((<=) i 1) - ^{showLinks Nothing lang} + $if ((>) i 1) + <div .row .text-center> + <div .span12> + <a href=#{nLink $ succ i}>#{backText lang} + \ -- # + <a href=#{nLink $ pred i}>#{nextText lang} + $elseif ((<=) i 1) + ^{showLinks Nothing lang} |] where nLink page = T.concat ["/", show' lang, "/?page=", show' page] showLinks Nothing lang = [shamlet| -<div class="centerbox"> - <a href=#{nLink}>#{backText lang} +<div .row .text-center> + <div .span12> + <a href=#{nLink}>#{backText lang} |] where nLink = T.concat ["/", show' lang, "/?page=2"] diff --git a/src/Locales.hs b/src/Locales.hs index 67c55a81dc62..34d3fadf25d0 100644 --- a/src/Locales.hs +++ b/src/Locales.hs @@ -18,7 +18,7 @@ import BlogDB (BlogLang (..)) data BlogError = NotFound | DBError -version = "3.5" +version = "4.0" allLang = [EN, DE] @@ -159,6 +159,6 @@ rightText DE = "English version <a href=\"/en\" class=\"link\">available here</a rightText EN = "Deutsche Version <a href=\"/de\" class=\"link\">hier verfügbar</a>." -- static information -repoURL :: Text = "https://bitbucket.org/tazjin/tazblog-haskell" +repoURL :: Text = "http://hg.tazj.in/tazblog-haskell" mailTo :: Text = "mailto:tazjin+blog@gmail.com" twitter :: Text = "http://twitter.com/#!/tazjin" |