--- a/FileBrowserV2.st Wed Apr 02 23:50:57 2003 +0200
+++ b/FileBrowserV2.st Thu Apr 03 00:40:24 2003 +0200
@@ -1644,8 +1644,7 @@
!FileBrowserV2 methodsFor:'startup & release'!
closeRequest
-
- (self application:#FileApplicationNoteBook do:#tryCloseApplications) not ifTrue:[
+ (self applicationNamed:#FileApplicationNoteBook do:[:appl | appl tryCloseApplications]) ifFalse:[
^ self
].
^ super closeRequest.
@@ -1740,7 +1739,7 @@
!FileBrowserV2 class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.78 2003-04-02 21:48:09 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.79 2003-04-02 22:40:24 cg Exp $'
! !
FileBrowserV2 initialize!