From eb89a60d2c3e32e6bb446138f7e89ae1ae2ed821 Mon Sep 17 00:00:00 2001
From: mainzelm <mainzelm>
Date: Thu, 11 Jan 2001 15:05:04 +0000
Subject: [PATCH] Replaced Scheme 48 with Scsh in user dialog.

---
 scheme/env/command.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scheme/env/command.scm b/scheme/env/command.scm
index b75e49b..b7f99ce 100644
--- a/scheme/env/command.scm
+++ b/scheme/env/command.scm
@@ -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))))