Tools__ClassList.st
branchjv
changeset 12158 54259ef3a49d
parent 12128 a7ff7d66ee85
child 12170 6c9c4b7981ee
--- a/Tools__ClassList.st	Mon Feb 13 18:52:36 2012 +0000
+++ b/Tools__ClassList.st	Mon Feb 13 19:19:58 2012 +0000
@@ -1125,6 +1125,22 @@
     "Created: / 07-08-2011 / 18:51:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!ClassList methodsFor:'initialize-release'!
+
+release
+    super release.
+
+    currentNamespace removeDependent:self.
+    sortByNameAndInheritance removeDependent:self.
+    hidePrivateClasses removeDependent:self.
+    markApplicationsHolder removeDependent:self.
+    meta removeDependent:self.
+    selectedClassNameIndices removeDependent:self.
+    showClassPackages removeDependent:self.
+
+    "Created: / 05-02-2000 / 13:42:18 / cg"
+! !
+
 !ClassList methodsFor:'private'!
 
 listOfClasses
@@ -1611,20 +1627,6 @@
     "Modified: / 31.10.2001 / 11:33:21 / cg"
 !
 
-release
-    super release.
-
-    currentNamespace removeDependent:self.
-    sortByNameAndInheritance removeDependent:self.
-    hidePrivateClasses removeDependent:self.
-    markApplicationsHolder removeDependent:self.
-    meta removeDependent:self.
-    selectedClassNameIndices removeDependent:self.
-    showClassPackages removeDependent:self.
-
-    "Created: / 05-02-2000 / 13:42:18 / cg"
-!
-
 updateClassesIn:aCollection
     "replace any obsolete class in aCollection;
      return true, if any was found"
@@ -1999,9 +2001,10 @@
 !ClassList class methodsFor:'documentation'!
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/Tools_ClassList.st,v 1.56 2011/08/07 18:40:45 vrany Exp §'
+    ^ 'Header: /cvs/stx/stx/libtool/Tools_ClassList.st,v 1.57 2012/02/13 13:46:28 cg Exp '
 !
 
 version_SVN
-    ^ '$Id: Tools__ClassList.st 7854 2012-01-30 17:49:41Z vranyj1 $'
+    ^ '$Id: Tools__ClassList.st 7887 2012-02-13 19:19:58Z vranyj1 $'
 ! !
+