* removed iMessage

This commit is contained in:
"Vincent Ambo ext:(%22) 2013-04-28 13:45:08 +02:00
parent 247265f354
commit 0f98c3f489
2 changed files with 4 additions and 9 deletions

View file

@ -46,7 +46,7 @@ $doctype 5
<div class="header">
<a class="btitle" href=#{append "/" (show' lang)}>#{blogTitle lang empty}
<p style="clear: both;">
<span class="contacts" id="cosx">^{contactInfo iMessage}
<span class="contacts" id="cosx">^{contactInfo}
<span class="righttext">^{preEscapedToHtml $ rightText lang}
<div class="middle">
^{body}
@ -57,14 +57,11 @@ $doctype 5
|]
where
rssUrl = T.concat ["/", show' lang, "/rss.xml"]
contactInfo imu = [shamlet|
contactInfo = [shamlet|
#{contactText lang}
<a class="link" href=#{mailTo}>Mail
, #
<a class="link" href=#{twitter} target="_blank">Twitter
#{orText lang}
<a class="link" href=#{imu}>iMessage
.
<a class="link" href=#{twitter} target="_blank">Twitter
|]
showFooter :: BlogLang -> Text -> Html

View file

@ -158,7 +158,5 @@ rightText EN = "Deutsche Version <a href=\"/de\" class=\"link\">hier verf&uuml;g
-- static information
repoURL :: Text = "https://bitbucket.org/tazjin/tazblog-haskell"
mailTo :: Text = "mailto:hej@tazj.in"
mailTo :: Text = "mailto:tazjin@gmail.com"
twitter :: Text = "http://twitter.com/#!/tazjin"
iMessage :: Text = "imessage:tazjin@me.com"
iMessage' :: Text = "sms:tazjin@me.com"