]> gitweb @ CieloNegro.org - Lucu.git/blobdiff - examples/HelloWorld.hs
Honor cnfServerV4Addr and cnfServerV6Addr.
[Lucu.git] / examples / HelloWorld.hs
index 187bd349415539228c5cc425b260551e2ab5aa72..71916f3203bf0e3bdf8a30073a74376a92550d9a 100644 (file)
@@ -1,8 +1,7 @@
-import Network
 import Network.HTTP.Lucu
 
 main :: IO ()
-main = let config    = defaultConfig { cnfServerPort = PortNumber 9999 }
+main = let config    = defaultConfig { cnfServerPort = "9999" }
            resources = mkResTree [ ( []
                                    , helloWorld )