hg/stx-projects-smalltalk: changeset 201:428fa2aee65f

author	Claus Gittinger <cg@exept.de>
	Thu, 13 Feb 1997 11:08:06 +0100
changeset 201	428fa2aee65f
parent 200	3ec17ba8ef56
child 202	a1cae27e4641

*** empty log message ***

--- a/smalltalk.rc	Sat Feb 01 19:58:34 1997 +0100
+++ b/smalltalk.rc	Thu Feb 13 11:08:06 1997 +0100
@@ -155,7 +155,11 @@
     ].
     '' errorPrintCR.
     'Textmode (enter smalltalk expressions terminated by single exclamation mark' errorPrintCR.
-    '          CTRL-D to leave line-by-line interpreter.)' errorPrintCR.
+    OperatingSystem isUNIXLike ifTrue:[
+        '          CTRL-D to leave line-by-line interpreter.)' errorPrintCR.
+    ] ifFalse:[
+        '          CTRL-Z to leave line-by-line interpreter.)' errorPrintCR.
+    ].
     Smalltalk readEvalPrint.
     Smalltalk exit
 ].