--- a/ByteCodeCompiler.st	Mon Nov 13 16:10:36 1995 +0100
+++ b/ByteCodeCompiler.st	Tue Nov 14 20:08:32 1995 +0100
@@ -25,7 +25,7 @@
 !ByteCodeCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.46 1995-11-13 15:10:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.47 1995-11-14 19:08:32 cg Exp $'
 !
 
 documentation
@@ -204,7 +204,7 @@
 			(cat notNil and:[cat ~~ oldMethod category]) ifTrue:[
 			    oldMethod category:cat.
 			    oldMethod changed:#category.    
-			    aClass updateVersionString.
+			    aClass updateRevisionString.
 			    aClass addChangeRecordForMethodCategory:oldMethod category:cat.
 			].
 			^ oldMethod
@@ -1795,7 +1795,7 @@
     newMethod := aClass compiledMethodAt:selector.
     newMethod notNil ifTrue:[
 	newMethod source:aString.
-	aClass updateVersionString.
+	aClass updateRevisionString.
 	aClass addChangeRecordForMethod:newMethod.
 	(silent or:[Smalltalk silentLoading == true]) ifFalse:[
 	    Transcript showCr:('    compiled: ', className,' ',selector,' - machine code')