--- a/Class.st	Thu May 22 14:41:46 1997 +0200
+++ b/Class.st	Fri May 23 09:09:47 1997 +0200
@@ -4302,6 +4302,7 @@
         c := revision first.
         c == $$ ifTrue:[
             info := Class revisionInfoFromString:revision.
+            info isNil ifTrue:[^ 0].
             ^ info at:#revision ifAbsent:0.
         ].
         c isDigit ifFalse:[
@@ -4327,8 +4328,8 @@
     "
 
     "Created: 7.12.1995 / 10:58:47 / cg"
-    "Modified: 15.10.1996 / 18:55:28 / cg"
     "Modified: 26.3.1997 / 00:24:51 / stefan"
+    "Modified: 23.5.1997 / 09:09:14 / cg"
 !
 
 packageSourceCodeInfo
@@ -4958,6 +4959,6 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.277 1997-04-23 10:30:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.278 1997-05-23 07:09:47 cg Exp $'
 ! !
 Class initialize!