Added an example of lucu-implant-file.

[Lucu.git] / examples / HelloWorld.hs

diff --git a/examples/HelloWorld.hs b/examples/HelloWorld.hs
index ad1263b530f133bde94f061b07e578fc212739a8..f21e052d7c0a8219ae0ee6b91510e081ee4032e4 100644 (file)
--- a/examples/HelloWorld.hs
+++ b/examples/HelloWorld.hs
@@ -13,7 +13,8 @@ main = let config    = defaultConfig { cnfServerPort = PortNumber 9999 }
                                    , staticDir "/usr/include" )
                                  ]
        in
-         runHttpd config resources
+         do putStrLn "Access http://localhost:9999/ with your browser."
+            runHttpd config resources
 
 
 helloWorld :: ResourceDef