X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=Lucu.git;a=blobdiff_plain;f=Network%2FHTTP%2FLucu%2FHttpd.hs;h=9632b298193e30a24b4711519896be32b3fa72dd;hp=2036412dd10d839831130ca44bb858d9e2c1757e;hb=1e53b8533fa22640147cc4ca4ce5075c8e39b0d8;hpb=50e8fe7af585a8d33d93b3721be8f8f01905b891 diff --git a/Network/HTTP/Lucu/Httpd.hs b/Network/HTTP/Lucu/Httpd.hs index 2036412..9632b29 100644 --- a/Network/HTTP/Lucu/Httpd.hs +++ b/Network/HTTP/Lucu/Httpd.hs @@ -42,7 +42,7 @@ import System.Posix.Signals -- > resUsesNativeThread = False -- > , resIsGreedy = False -- > , resGet --- > = Just $ do setContentType $ "text" "plain" +-- > = Just $ do setContentType $ read "text/plain" -- > output "Hello, world!" -- > , resHead = Nothing -- > , resPost = Nothing