mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* serving correct css location

Browse source
This commit is contained in:
"Vincent Ambo ext:(%22) 2013-05-05 21:06:49 +02:00
parent c7a538e7d1
commit df9603369d
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/Main.hs
View file

@ -95,7 +95,7 @@ tazBlog acid captchakey = do
ok $ toResponse $ adminIndex ("tazjin" :: Text) ok $ toResponse $ adminIndex ("tazjin" :: Text)
, dir "admin" $ ok $ toResponse adminLogin , dir "admin" $ ok $ toResponse adminLogin
, dir "dologin" $ processLogin acid , dir "dologin" $ processLogin acid
, do dirs "static/blogv300.css" nullDir , do dirs "static/blogv40.css" nullDir
setHeaderM "content-type" "text/css" setHeaderM "content-type" "text/css"
setHeaderM "cache-control" "max-age=630720000" setHeaderM "cache-control" "max-age=630720000"
setHeaderM "expires" "Tue, 20 Jan 2037 04:20:42 GMT" setHeaderM "expires" "Tue, 20 Jan 2037 04:20:42 GMT"