X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=Lucu.git;a=blobdiff_plain;f=examples%2FHelloWorld.hs;h=928dab9fcfc976cab1360b1ceafde01f8b43c76a;hp=d584009c61cd3f4411836e18f2d0e299741ded70;hb=a827a5e1ba744d89c5b2396bb195e344ae892306;hpb=0b4db5681e3b0b27357a87316822ea3671f8c174

diff --git a/examples/HelloWorld.hs b/examples/HelloWorld.hs
index d584009..928dab9 100644
--- a/examples/HelloWorld.hs
+++ b/examples/HelloWorld.hs
@@ -13,7 +13,6 @@ import Network.HTTP.Lucu.Resource.Tree
 import Network.HTTP.Lucu.Response
 import Network.HTTP.Lucu.StaticFile
 import Network.URI
-import System.Posix.Signals
 import System.Time
 
 main :: IO ()
@@ -28,8 +27,7 @@ main = let config    = defaultConfig { cnfServerPort = PortNumber 9999 }
                                    , staticDir "/usr/include" )
                                  ]
        in
-         do installHandler sigPIPE Ignore Nothing
-            runHttpd config resources
+         runHttpd config resources
 
 
 helloWorld :: ResourceDef