Replaced Scheme 48 with Scsh in user dialog.

This commit is contained in:
mainzelm 2001-01-11 15:05:04 +00:00
parent 4643aa5362
commit eb89a60d2c
1 changed files with 1 additions and 1 deletions

View File

@ -90,7 +90,7 @@
; perhaps this should use scheme-exit-now, but I'm
; worried that it is what handles normal EOF. (HCC)
(exit-command-processor (lambda () 0)))
((y-or-n? "Exit Scheme 48" #t)
((y-or-n? "Exit Scsh?" #t)
(exit-command-processor (lambda () 1)))
(else
(abort-to-command-level (car levels))))