AbstractFileBrowser.st
changeset 5290 8aeb40fef0f7
parent 5273 b65451d5872a
child 5300 260ccc2864cb
--- a/AbstractFileBrowser.st	Tue Oct 21 16:14:16 2003 +0200
+++ b/AbstractFileBrowser.st	Tue Oct 21 20:21:29 2003 +0200
@@ -2489,16 +2489,13 @@
 !
 
 openApplByFileItem:anItem
-
     self 
         applicationNamed:#FileApplicationNoteBook
-        ifPresentDo:[:appl | ^ appl openApplByFileItem:anItem].
-
-    ^ nil
+        ifPresentDo:[:appl | appl openApplByFileItem:anItem. ^self].
 !
 
 openApplForFile:aFilename
-    ^ self openApplByFileItem:(DirectoryContentsBrowser itemClass fileName:aFilename).
+    self openApplByFileItem:(DirectoryContentsBrowser itemClass fileName:aFilename).
 !
 
 openCommandResultApplication
@@ -6427,5 +6424,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.177 2003-10-13 13:32:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.178 2003-10-21 18:20:57 cg Exp $'
 ! !