git.iko.soy/typeable/wai
on master help sign in
Better exception support
commit735f7b914dc24003140f69cecba5d531e68ec363 authorMichael <michael@snoyman.com> dateTue 24 May 2011, 10:48 (15 years ago) parente395aad
2 files changed+5−2
compare with master
unifiedsplit
Network/Wai/Handler/Launch.hs+4−1 wai-handler-launch.cabal+1−1
Network/Wai/Handler/Launch.hs+4−1
@@ -45,7 +45,10 @@ launch = rawSystem "xdg-open" ["http://localhost:4587/"] >> return ()
4545run :: Application -> IO ()
4646run app = do
4747 x <- newIORef True
48− forkIO $ Warp.run 4587 $ ping x app
48+ forkIO $ Warp.runSettings Warp.defaultSettings
49+ { Warp.settingsPort = 4587
50+ , Warp.settingsOnException = const $ return ()
51+ } $ ping x app
4952 launch
5053 loop x
5154
wai-handler-launch.cabal+1−1
@@ -18,7 +18,7 @@ Library
1818 , http-types >= 0.6 && < 0.7
1919 , transformers >= 0.2 && < 0.3
2020 , bytestring >= 0.9 && < 1
21− , blaze-builder >= 0.3 && < 0.4
21+ , blaze-builder >= 0.2 && < 0.4
2222 , enumerator >= 0.4 && < 0.5
2323 if os(windows)
2424 c-sources: windows.c