--- a/Class.st	Sat Dec 09 16:08:16 1995 +0100
+++ b/Class.st	Sat Dec 09 17:10:12 1995 +0100
@@ -836,13 +836,15 @@
     "Modified: 7.12.1995 / 10:54:53 / cg"
 !
 
-revision:aString
+setBinaryRevision:aString
     "set the revision-ID.
      This should normally not be done in the running system, as the source-manager
      will need this to validate sourcefiles being correct for a given binary
      (and optionally: extracting the required sourcefile from the rcs source)"
 
     revision := aString
+
+    "Created: 9.12.1995 / 17:05:17 / cg"
 !
 
 setClassFilename:aFilename
@@ -3358,6 +3360,6 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.102 1995-12-09 14:58:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.103 1995-12-09 16:10:12 cg Exp $'
 ! !
 Class initialize!