diff options
| author | Vincent Ambo <v.ambo@me.com> | 2012-03-22T13·34+0100 |
|---|---|---|
| committer | Vincent Ambo <v.ambo@me.com> | 2012-03-22T13·34+0100 |
| commit | 6a8ffaf25a87905a9a6b15b26ffd1db03312d793 (patch) | |
| tree | 74d5d2246ba22d4f80d7e0da1786721a16796ed3 /src/Main.hs | |
| parent | f6f066a93e7f62846b5bac5d469f4f4c6170c351 (diff) | |
* cleaned up res/ folder
* serving static/ content from res/ with 20 years expiration date * linen texture
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Main.hs b/src/Main.hs index f0c28b9b5b..f1bc9114a6 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -75,6 +75,9 @@ tazBlog acid = do ok $ toResponse $ adminIndex ("tazjin" :: Text) , dir "admin" $ ok $ toResponse $ adminLogin , dir "dologin" $ processLogin acid + , do setHeaderM "cache-control" "max-age=630720000" + setHeaderM "expires" "Tue, 20 Jan 2037 04:20:42 GMT" + dir "static" $ serveDirectory DisableBrowsing [] "../res" , serveDirectory DisableBrowsing [] "../res" , notFound $ toResponse $ showError NotFound DE ] |