--- a/Class.st	Fri Dec 20 00:23:26 1996 +0100
+++ b/Class.st	Fri Dec 20 01:14:43 1996 +0100
@@ -456,10 +456,12 @@
             words size > 2 ifTrue:[
                 (words at:3) = '$' ifFalse:[
                     info at:#revision put:(words at:3).
-                    info at:#date put:(words at:4).
-                    info at:#time put:(words at:5).
-                    info at:#user put:(words at:6).
-                    info at:#state put:(words at:7).
+                    (words at:4) = '$' ifFalse:[
+                        info at:#date put:(words at:4).
+                        info at:#time put:(words at:5).
+                        info at:#user put:(words at:6).
+                        info at:#state put:(words at:7).
+                    ]
                 ].
             ].
             ^ info
@@ -488,7 +490,7 @@
     ^ nil
 
     "Created: 15.11.1995 / 14:58:35 / cg"
-    "Modified: 10.12.1996 / 18:10:15 / cg"
+    "Modified: 20.12.1996 / 01:06:27 / cg"
 !
 
 revisionStringFromSource:aMethodSourceString
@@ -4517,6 +4519,6 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.221 1996-12-19 23:08:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.222 1996-12-20 00:14:43 cg Exp $'
 ! !
 Class initialize!