[blog] Remove unneeded Lucius usage

2 files changed, 0 insertions, 8 deletions

diff --git a/src/Blog.hs b/src/Blog.hs
index 97c7fa9bc961..f44cfe1f4265 100644
--- a/src/Blog.hs
+++ b/src/Blog.hs
@@ -9,7 +9,6 @@ import Data.Time
 import Locales
 import Text.Blaze.Html (preEscapedToHtml)
 import Text.Hamlet
-import Text.Lucius
 import Text.Markdown
 
 import qualified Data.Text as T
diff --git a/src/Server.hs b/src/Server.hs
index 6996583f5ddb..df8916d85d3b 100644
--- a/src/Server.hs
+++ b/src/Server.hs
@@ -60,13 +60,6 @@ staticHandler resDir = do
   setHeaderM "expires" "Tue, 20 Jan 2037 04:20:42 GMT"
   serveDirectory DisableBrowsing [] resDir
 
-serveBlogStyle :: ServerPart Response
-serveBlogStyle = do
-  setHeaderM "content-type" "text/css"
-  setHeaderM "cache-control" "max-age=630720000"
-  setHeaderM "expires" "Tue, 20 Jan 2037 04:20:42 GMT"
-  ok $ toResponse $ blogStyle
-
 adminHandler :: AcidState Blog -> ServerPart Response
 adminHandler acid = do
   guardSession acid