From 230263ee0d49cfd462c3f32a53084d23e552864a Mon Sep 17 00:00:00 2001
From: shivers <shivers>
Date: Mon, 10 Mar 1997 23:46:42 +0000
Subject: [PATCH] Fixed an arity bug in %set-unix-signal-handler's call to
 %%set-unix-signal-handler.

---
 scsh/sighandlers.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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))))))