--- a/SimpleView.st	Fri Jun 20 11:52:27 2008 +0200
+++ b/SimpleView.st	Mon Jun 23 17:29:03 2008 +0200
@@ -4493,15 +4493,6 @@
     "Created: 11.6.1997 / 13:10:51 / cg"
 !
 
-release
-    "remove all dependencies from the receiver"
-
-    dependents := nil
-
-    "Modified: 19.4.1996 / 10:31:35 / cg"
-    "Created: 11.6.1997 / 13:11:53 / cg"
-!
-
 removeDependent:anObject
     "make the argument, anObject be independent of the receiver"
 
@@ -6725,6 +6716,20 @@
     "Modified: / 6.5.1999 / 13:11:07 / cg"
 !
 
+release
+    "remove all dependencies from the receiver"
+
+    visibilityChannel notNil ifTrue:[
+        visibilityChannel retractInterestsFor:self.
+        visibilityChannel removeDependent:self. visibilityChannel := nil
+    ].
+
+    dependents := nil.
+
+    "Modified: 19.4.1996 / 10:31:35 / cg"
+    "Created: 11.6.1997 / 13:11:53 / cg"
+!
+
 restarted
     "sent by my windowGroup, when restarted from an image.
      Nothing done here, but can be redefined to perform any actions
@@ -10132,7 +10137,7 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.586 2008-06-03 16:07:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.587 2008-06-23 15:29:03 cg Exp $'
 ! !
 
 SimpleView initialize!