FileBrowserV2.st
branchjv
changeset 13173 e9da2324940d
parent 12807 ba8c5416aa28
parent 12961 710f09bbdd4d
child 13178 c9bf900fe729
--- a/FileBrowserV2.st	Thu Jun 13 12:23:07 2013 +0100
+++ b/FileBrowserV2.st	Fri Jun 21 19:05:40 2013 +0100
@@ -1833,10 +1833,12 @@
     removeCol := OrderedCollection new.
     hist do:[:aFileItem|
         "aFileItem fileName exists" true ifTrue:[
-            menu addItem:(MenuItem label: aFileItem fileName asString value:[
-                self setCurrentFileName:(aFileItem fileName).
-                self openApplByFileItem:aFileItem
-            ]).
+            menu addItem:(MenuItem 
+                            label: aFileItem fileName asString 
+                            itemValue:[
+                                self setCurrentFileName:(aFileItem fileName).
+                                self openApplByFileItem:aFileItem
+                            ]).
         ] ifFalse:[
             removeCol add:aFileItem.
         ]
@@ -2043,7 +2045,7 @@
 !FileBrowserV2 class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.208 2013-05-21 20:13:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.209 2013-06-21 00:44:41 cg Exp $'
 !
 
 version_HG