From 269b6030817e3e38bc575c1abcc6fb90ac7db326 Mon Sep 17 00:00:00 2001 From: shivers Date: Tue, 16 Jun 1998 18:05:44 +0000 Subject: [PATCH] Trivial reindent. -Olin --- scsh/sighandlers.scm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/scsh/sighandlers.scm b/scsh/sighandlers.scm index e12c724..34fee56 100644 --- a/scsh/sighandlers.scm +++ b/scsh/sighandlers.scm @@ -142,10 +142,11 @@ (int->signal int)) => ; to ignored. (lambda (sig) (%set-unix-signal-handler sig 0))) + ((and handler (not ohandler) ; Toggling from ignored (int->signal int)) => ; to something. - (lambda (sig) - (%set-unix-signal-handler sig 2)))) + (lambda (sig) + (%set-unix-signal-handler sig 2)))) ohandler))