git.iko.soy/typeable/wai
on master help sign in
Added static file test
commite86fffa63635dfa47a555d86c7f820fdceb2a61a authorMichael Snoyman <michael@snoyman.com> dateTue 11 Jan 2011, 19:18 (16 years ago) parent09a31b4
2 files changed+6
compare with master
unifiedsplit
file.hs+5 test.txt+1
file.hsnew file+5
@@ -0,0 +1,5 @@
1+{-# LANGUAGE OverloadedStrings #-}
2+import Network.Wai
3+import Network.Wai.Handler.Warp
4+
5+main = run 3000 $ const $ return $ ResponseFile status200 [("Content-Type", "text/plain"), ("Content-Length", "16")] "test.txt"
test.txtnew file+1
@@ -0,0 +1 @@
1+This is a test.