Change `else' to `t' in final clause of cond.
authorChris Hanson <org/chris-hanson/cph>
Fri, 4 Dec 1987 19:24:45 +0000 (19:24 +0000)
committerChris Hanson <org/chris-hanson/cph>
Fri, 4 Dec 1987 19:24:45 +0000 (19:24 +0000)
etc/xscheme.el

index ab2cd42d62e1f8785b590c0d5a0be72285305b0f..4946358a73140ba537ee3a9e865f81cb169552a2 100644 (file)
@@ -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)
 \f
@@ -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)