Initial Apache 1.3 support

[hcoop/domtool2.git] / src / compat_mlton.sml

diff --git a/src/compat_mlton.sml b/src/compat_mlton.sml
index 7b28b7e..9a6b60f 100644 (file)
--- a/src/compat_mlton.sml
+++ b/src/compat_mlton.sml
@@ -26,6 +26,5 @@ end
 val _ = let
     open MLton.Signal
 in
 val _ = let
     open MLton.Signal
 in

-    setHandler (Posix.Signal.pipe, Handler.ignore);
-    setHandler (Posix.Signal.chld, Handler.ignore)
+    setHandler (Posix.Signal.pipe, Handler.ignore)

 end
 end