diff --git a/scsh/sighandlers.scm b/scsh/sighandlers.scm
index f884682..e12c724 100644
--- a/scsh/sighandlers.scm
+++ b/scsh/sighandlers.scm
@@ -170,7 +170,8 @@
 	     handler-code
 	     %set-unix-signal-handler)
   (let retry ()
-    (receive (err old-hc) (%%set-unix-signal-handler sig handler-code)
+    (receive (err old-hc old-flags)
+	     (%%set-unix-signal-handler sig handler-code 0)
       (cond ((not err) old-hc)
 	    ((= err errno/intr) (retry))
 	    (else (errno-error err %set-unix-signal-handler sig handler-code))))))