--- a/Tools_ProjectList.st	Fri Jul 18 13:11:58 2008 +0200
+++ b/Tools_ProjectList.st	Fri Jul 18 13:12:04 2008 +0200
@@ -339,6 +339,9 @@
 !
 
 update:something with:aParameter from:changedObject
+self window topView realized ifFalse:[
+self makeIndependent
+].
     changedObject == Smalltalk ifTrue:[
         something == #methodDictionary ifTrue:[
             ^ self 
@@ -677,6 +680,7 @@
 
 makeIndependent
     Smalltalk removeDependent:self.
+    ChangeSet removeDependent:self.
 !
 
 nameListFor:aProjectList
@@ -827,5 +831,5 @@
 !ProjectList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_ProjectList.st,v 1.35 2008-05-20 15:28:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_ProjectList.st,v 1.36 2008-07-18 11:12:04 fm Exp $'
 ! !