DirectoryView.st
changeset 2878 241be37ce37b
parent 2439 9f6c2575f2b1
child 2938 8e9207531826
--- a/DirectoryView.st	Mon Feb 06 13:12:52 2012 +0100
+++ b/DirectoryView.st	Mon Feb 13 14:44:39 2012 +0100
@@ -406,6 +406,20 @@
     "Modified: / 20.6.1998 / 14:46:10 / cg"
 ! !
 
+!DirectoryView methodsFor:'initialize-release'!
+
+release
+
+    monitoring ifTrue:
+    [
+        Processor removeTimedBlock:monitoringTimeBlock.
+        monitoringTimeBlock := nil
+    ].
+
+    super release
+
+! !
+
 !DirectoryView methodsFor:'menu actions'!
 
 updateFileList
@@ -592,18 +606,6 @@
 
     super closeRequest
 
-!
-
-release
-
-    monitoring ifTrue:
-    [
-        Processor removeTimedBlock:monitoringTimeBlock.
-        monitoringTimeBlock := nil
-    ].
-
-    super release
-
 ! !
 
 !DirectoryView::FileRow class methodsFor:'resources'!