--- a/Class.st Thu Sep 12 03:05:28 1996 +0200
+++ b/Class.st Thu Sep 12 09:42:45 1996 +0200
@@ -3562,7 +3562,7 @@
]
].
p notEmpty ifTrue:[
- p := '(' , p , ')'.
+"/ p := '(' , p , ')'.
package notNil ifTrue:[
(name , ': changing packageID to ''' , p , '''') infoPrintCR.
@@ -3583,8 +3583,8 @@
MemoryMonitor setPackageFromRevision
"
- "Modified: 20.5.1996 / 10:31:51 / cg"
"Modified: 12.6.1996 / 11:49:31 / stefan"
+ "Modified: 5.9.1996 / 15:33:14 / cg"
!
sourceStream
@@ -4025,6 +4025,6 @@
!Class class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.167 1996-09-11 17:24:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.168 1996-09-12 07:42:45 cg Exp $'
! !
Class initialize!