--- a/Smalltalk.st	Fri Aug 11 11:04:09 2006 +0200
+++ b/Smalltalk.st	Fri Aug 11 11:06:50 2006 +0200
@@ -6094,7 +6094,9 @@
 
     f := packageDir construct:'extensions.st'.
     f exists ifTrue:[
-        f fileIn.
+        Class withoutUpdatingChangeSetDo:[
+            f fileIn.
+        ].
         SilentLoading ifFalse:[
             Transcript showCR:('loaded extensions: ' , f pathName).
         ].
@@ -6893,5 +6895,5 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.735 2006-08-10 11:45:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.736 2006-08-11 09:06:50 ca Exp $'
 ! !