summary refs log tree commit diff
path: root/src/Locales.hs
diff options
context:
space:
mode:
authorVincent Ambo <viam@humac.com>2012-03-06T22·34+0100
committerVincent Ambo <viam@humac.com>2012-03-06T22·34+0100
commitcd3a5f2cb5f73c6aff16a153864d56faca59e30b (patch)
treee4adea150d65a0c3ecf57b2a18bca796405c60af /src/Locales.hs
parent6220988fc5fa89a3f581c446fddd103beabc32cd (diff)
* links on right side
Diffstat (limited to 'src/Locales.hs')
-rw-r--r--src/Locales.hs7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/Locales.hs b/src/Locales.hs
index 0f539516414c..047beb8aad9b 100644
--- a/src/Locales.hs
+++ b/src/Locales.hs
@@ -15,6 +15,9 @@ instance Show BlogLang where
     show EN = "en"
     show DE = "de"
 
+data BlogError = NotFound | DBError
+
+
 version = "2.2b"
 
 allLang = [EN, DE]
@@ -111,8 +114,8 @@ cTimeFormat EN = "[On %D at %H:%M]"
 
 -- right side text (this is inserted AS IS. Escape HTML!)
 rightText :: BlogLang -> Text
-rightText DE = "English version <a href=\"en\">available here</a>"
-rightText EN = "Deutsche Version <a href=\"de\">hier verf&uuml;gbar</a>"
+rightText DE = "English version <a href=\"/en\" style=\"color: black;\">available here</a>."
+rightText EN = "Deutsche Version <a href=\"/de\" style=\"color: black;\">hier verf&uuml;gbar</a>."
 
 -- static information
 repoURL   :: Text = "https://bitbucket.org/tazjin/tazblog-haskell"