--- a/FramedBox.st	Thu Aug 22 18:49:50 2002 +0200
+++ b/FramedBox.st	Thu Aug 22 18:54:57 2002 +0200
@@ -655,17 +655,6 @@
 
 !FramedBox methodsFor:'initialization'!
 
-destroy
-
-    labelChannel notNil ifTrue:[
-        labelChannel removeDependent:self.
-        labelChannel := nil.
-    ].
-    super destroy
-
-
-!
-
 fetchDeviceResources
     "fetch device colors, to avoid reallocation at redraw time"
 
@@ -703,6 +692,15 @@
     showFrame := true
 
     "Modified: 10.1.1996 / 14:38:40 / cg"
+!
+
+release
+
+    labelChannel notNil ifTrue:[
+        labelChannel removeDependent:self.
+        labelChannel := nil.
+    ].
+    super release
 ! !
 
 !FramedBox methodsFor:'queries'!
@@ -774,5 +772,5 @@
 !FramedBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.43 2001-05-17 14:53:16 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.44 2002-08-22 16:54:57 cg Exp $'
 ! !