checkin from browser
authorClaus Gittinger <cg@exept.de>
Thu, 23 Apr 1998 15:54:29 +0200
changeset 3401 da5821d3e57e
parent 3400 0299171cfcf3
child 3402 d24e9629cdfb
checkin from browser
Class.st
--- a/Class.st	Thu Apr 23 14:11:12 1998 +0200
+++ b/Class.st	Thu Apr 23 15:54:29 1998 +0200
@@ -3748,7 +3748,7 @@
     (aStream notNil and:[validated not]) ifTrue:[
         (self validateSourceStream:aStream) ifFalse:[
             (Smalltalk releaseIdentification = 'ST/X_free_demo_vsn') ifTrue:[
-                ('Class [warning]: source for ''' , self name , ''' is not available in the demo version.') infoPrintCR
+"/                ('Class [info]: source for ''' , self name , ''' is not available in the demo version.') infoPrintCR
             ] ifFalse:[
                 ('Class [warning]: source for ''' , self name , ''' is invalid or stripped. Take care.') errorPrintCR
             ]
@@ -3764,7 +3764,7 @@
 
     "Created: / 10.11.1995 / 21:05:13 / cg"
     "Modified: / 22.4.1998 / 19:20:50 / ca"
-    "Modified: / 23.4.1998 / 14:10:32 / cg"
+    "Modified: / 23.4.1998 / 15:53:54 / cg"
 !
 
 updateVersionMethodFor:newRevisionString
@@ -3920,5 +3920,5 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.309 1998-04-23 12:11:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.310 1998-04-23 13:54:29 cg Exp $'
 ! !