Implemented fallback handler.

[Lucu.git] / examples / Multipart.hs

diff --git a/examples/Multipart.hs b/examples/Multipart.hs
index b7faa38dc97405aebb0d909a11d2cd2fa344f913..e68bb396e5b292814845f7849af70995f0f35546 100644 (file)
--- a/examples/Multipart.hs
+++ b/examples/Multipart.hs
@@ -8,7 +8,7 @@ main = let config    = defaultConfig { cnfServerPort = PortNumber 9999 }
            resources = mkResTree [ ([], resMain) ]
        in
          do putStrLn "Access http://localhost:9999/ with your browser."
-            runHttpd config resources
+            runHttpd config resources []
 
 
 resMain :: ResourceDef