From 6cbd7aa0a64d35d29184932dd0b5fd19eaa95917 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Fri, 4 Dec 1987 19:24:45 +0000 Subject: [PATCH] Change `else' to `t' in final clause of cond. --- etc/xscheme.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/etc/xscheme.el b/etc/xscheme.el index ab2cd42d6..4946358a7 100644 --- a/etc/xscheme.el +++ b/etc/xscheme.el @@ -21,7 +21,7 @@ ;;; Requires C-Scheme release 5 or later ;;; Changes to Control-G handler require runtime version 13.85 or later -;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/xscheme.el,v 1.4 1987/12/04 18:58:01 cph Exp $ +;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/xscheme.el,v 1.5 1987/12/04 19:24:45 cph Exp $ (require 'scheme) @@ -247,7 +247,7 @@ Control returns to the top level rep loop." (interrupt-process "scheme" t)) (xscheme-control-g-disabled-p (message "Relax...")) - (else + (t (setq xscheme-control-g-disabled-p t) (message "Sending C-G interrupt to Scheme...") (interrupt-process "scheme" t) -- 2.25.1