--- a/Class.st	Mon Dec 20 18:32:29 1993 +0100
+++ b/Class.st	Sat Jan 08 17:08:02 1994 +0100
@@ -12,7 +12,7 @@
 
 ClassDescription subclass:#Class
        instanceVariableNames:'classvars comment subclasses classFileName'
-       classVariableNames:'updatingChanges'
+       classVariableNames:'UpdatingChanges'
        poolDictionaries:''
        category:'Kernel-Classes'
 !
@@ -41,23 +41,23 @@
 
 Class variables:
 
-updatingChanges <Boolean>       true if the changes-file shall be updated
+UpdatingChanges <Boolean>       true if the changes-file shall be updated
 
 WARNING: layout known by compiler and runtime system
 
-$Header: /cvs/stx/stx/libbasic/Class.st,v 1.6 1993-12-16 10:52:05 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Class.st,v 1.7 1994-01-08 16:08:02 claus Exp $
 written Spring 89 by claus
 '!
 
 !Class class methodsFor:'initialization'!
 
 initialize
-    "the classvariable 'updatingChanges' controls if changes are put
+    "the classvariable 'UpdatingChanges' controls if changes are put
      into the changes-file; normally this variable is set to true, but
      for example during fileIn or when changes are applied, it is set to false
      to prevent changes file from getting too much junk."
      
-    updatingChanges := true
+    UpdatingChanges := true
 ! !
 
 !Class class methodsFor:'creating new classes'!
@@ -575,8 +575,8 @@
 
     |prev|
 
-    prev := updatingChanges.
-    updatingChanges := aBoolean.
+    prev := UpdatingChanges.
+    UpdatingChanges := aBoolean.
     ^ prev
 !
 
@@ -585,7 +585,7 @@
 
     |aStream|
 
-    updatingChanges ifTrue:[
+    UpdatingChanges ifTrue:[
         aStream := FileStream oldFileNamed:'changes'.
         aStream isNil ifTrue:[
             aStream := FileStream newFileNamed:'changes'.