diff --git a/res/admin.css b/res/admin.css index 5225fe103..2eb375dd1 100644 --- a/res/admin.css +++ b/res/admin.css @@ -47,4 +47,4 @@ body { padding-right: 10px; min-height:200px; width:378px; -} \ No newline at end of file +} diff --git a/src/Blog.hs b/src/Blog.hs index 34b2aaf52..973382bc9 100644 --- a/src/Blog.hs +++ b/src/Blog.hs @@ -83,8 +83,6 @@ showFooter l v = [shamlet| \ and without PHP, Java, Perl, MySQL and Python.

#{append "Version " v} -   - #{noticeText l}

ಠ_ಠ @@ -168,24 +166,6 @@ renderEntry e@Entry{..} = [shamlet| where woText = flip T.append author $ T.pack $ formatTime defaultTimeLocale (eTimeFormat lang) edate - -showSiteNotice :: Html -showSiteNotice = [shamlet| -$doctype 5 - - Impressum -<body> - <h2>Impressum - <br> - <p> - Vincent Ambo - <br> - Gyllenborgsgatan 8, LGH 1306 - <br> - 11243 Stockholm - <p><a href="/" style="color:black;">Back -|] - {- Administration pages -} adminTemplate :: Text -> Html -> Html diff --git a/src/Server.hs b/src/Server.hs index 3b70f348a..0522d9d7a 100644 --- a/src/Server.hs +++ b/src/Server.hs @@ -21,7 +21,6 @@ import BlogDB hiding (updateEntry) import Locales import RSS - instance FromReqURI BlogLang where fromReqURI sub = case map toLower sub of