category of: #release
authorClaus Gittinger <cg@exept.de>
Mon, 13 Feb 2012 14:45:31 +0100
changeset 11257 7bc6429c64c5
parent 11256 8427255f0072
child 11258 0a6850644110
category of: #release
Tools_BrowserList.st
--- a/Tools_BrowserList.st	Mon Feb 13 14:45:27 2012 +0100
+++ b/Tools_BrowserList.st	Mon Feb 13 14:45:31 2012 +0100
@@ -1077,6 +1077,29 @@
     ^ self fetchIcon:#trace selector:#traceIcon
 ! !
 
+!BrowserList methodsFor:'initialize-release'!
+
+release
+    self makeIndependent.
+    super release.
+
+    filter removeDependent:self.
+    forceGeneratorTrigger removeDependent:self.
+    hideUnloadedClasses removeDependent:self.
+    inGeneratorHolder removeDependent:self.
+    nameSpaceFilter removeDependent:self.
+    organizerMode removeDependent:self.
+    packageFilter removeDependent:self.
+    selectionHolder removeDependent:self.
+    showClassPackages removeDependent:self.
+    slaveMode removeDependent:self.
+    sortBy removeDependent:self.
+    updateTrigger removeDependent:self.
+
+    "Created: / 5.2.2000 / 13:42:09 / cg"
+    "Modified: / 13.2.2000 / 23:32:23 / cg"
+! !
+
 !BrowserList methodsFor:'misc'!
 
 invalidateList
@@ -1241,27 +1264,6 @@
     "Created: / 5.2.2000 / 13:42:08 / cg"
 !
 
-release
-    self makeIndependent.
-    super release.
-
-    filter removeDependent:self.
-    forceGeneratorTrigger removeDependent:self.
-    hideUnloadedClasses removeDependent:self.
-    inGeneratorHolder removeDependent:self.
-    nameSpaceFilter removeDependent:self.
-    organizerMode removeDependent:self.
-    packageFilter removeDependent:self.
-    selectionHolder removeDependent:self.
-    showClassPackages removeDependent:self.
-    slaveMode removeDependent:self.
-    sortBy removeDependent:self.
-    updateTrigger removeDependent:self.
-
-    "Created: / 5.2.2000 / 13:42:09 / cg"
-    "Modified: / 13.2.2000 / 23:32:23 / cg"
-!
-
 releaseAsSubCanvas
     self makeIndependent.
     super releaseAsSubCanvas.
@@ -1765,5 +1767,5 @@
 !BrowserList class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.39 2011-12-04 14:57:04 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.40 2012-02-13 13:45:31 cg Exp $'
 ! !