rel5 migration
authorClaus Gittinger <cg@exept.de>
Sun, 09 Jul 2000 23:20:38 +0200
changeset 5455 d9e181a5015a
parent 5454 7c81e5984e44
child 5456 a96c23f8da35
rel5 migration
Smalltalk.st
--- a/Smalltalk.st	Sun Jul 09 19:47:18 2000 +0200
+++ b/Smalltalk.st	Sun Jul 09 23:20:38 2000 +0200
@@ -2133,7 +2133,7 @@
                 Transcript cr.
             ].
 
-            DemoMode ifTrue:[
+            DemoMode==true ifTrue:[
                 Transcript showCR:'*** Restricted use:                              ***'.
                 Transcript showCR:'*** This program may be used for education only. ***'.
                 Transcript showCR:'*** Please read the files COPYRIGHT and LICENSE  ***'.
@@ -5664,5 +5664,5 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.455 2000-07-05 16:36:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.456 2000-07-09 21:20:38 cg Exp $'
 ! !