--- a/ChangesBrowser.st	Mon Oct 20 11:33:18 2008 +0200
+++ b/ChangesBrowser.st	Mon Oct 20 12:42:47 2008 +0200
@@ -2708,6 +2708,11 @@
         changeClass isNil ifTrue:[
             changeClass := self classOfChange:changeNr.
         ].
+        changeClass notNil ifTrue:[
+            "load unloaded class. Otherwise a class definition change
+             will create a class without methods"
+            changeClass autoload.
+        ].
     ].
 
     changeNrProcessed := changeNr.
@@ -6005,5 +6010,5 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.380 2008-10-12 14:25:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.381 2008-10-20 10:42:47 stefan Exp $'
 ! !