--- a/AbstractFileApplicationNoteBookComponent.st	Tue Oct 01 10:35:51 2002 +0200
+++ b/AbstractFileApplicationNoteBookComponent.st	Tue Oct 01 10:39:21 2002 +0200
@@ -68,6 +68,7 @@
     "/ tell the NoteBookApplication to close me
     (master := self masterApplication) notNil ifTrue:[
         master closeSubCanvas:self.
+        self release.
     ] ifFalse:[
         self closeRequest.
     ].
@@ -183,5 +184,5 @@
 !AbstractFileApplicationNoteBookComponent class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileApplicationNoteBookComponent.st,v 1.1 2002-09-25 08:00:15 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileApplicationNoteBookComponent.st,v 1.2 2002-10-01 08:39:21 cg Exp $'
 ! !