--- a/AbstractFileBrowser.st	Thu Jun 13 12:23:07 2013 +0100
+++ b/AbstractFileBrowser.st	Fri Jun 21 19:05:40 2013 +0100
@@ -5126,11 +5126,13 @@
     bookmarks notEmptyOrNil ifTrue:[
         menu addItem:(MenuItem labeled:'-').
         bookmarks do:[:dirName |
-            menu addItem:((MenuItem label:dirName asString value:[
-                (self currentSelectedDirectories includes:dirName) ifFalse:[
-                    self setCurrentFileName:dirName.
-                ].
-            ])).
+            menu addItem:(MenuItem 
+                            label:dirName asString 
+                            itemValue:[
+                                (self currentSelectedDirectories includes:dirName) ifFalse:[
+                                    self setCurrentFileName:dirName.
+                                ].
+                            ]).
         ].
     ].
     menu findGuiResourcesIn:self.
@@ -5163,11 +5165,13 @@
     bookmarks notEmptyOrNil ifTrue:[
         menu addItem:(MenuItem labeled:'-').
         bookmarks do:[:dirName |
-            menu addItem:((MenuItem label:dirName asString value:[
-                (self currentSelectedDirectories includes:dirName) ifFalse:[
-                    self setCurrentFileName:dirName.
-                ].
-            ])).
+            menu addItem:(MenuItem 
+                            label:dirName asString 
+                            itemValue:[
+                                (self currentSelectedDirectories includes:dirName) ifFalse:[
+                                    self setCurrentFileName:dirName.
+                                ].
+                            ]).
         ].
     ].
     menu findGuiResourcesIn:self.
@@ -5248,10 +5252,12 @@
 
     hist copy do:[:aFileItem|
         aFileItem fileName exists 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:[
             "/ remove all not existing history entries
             hist remove:aFileItem.
@@ -5321,9 +5327,11 @@
     menu := Menu new.
 
     histCopy do:[:aFile| 
-        menu addItem:(MenuItem label:aFile asString value:[
-            self setCurrentFileName:(aFile path asFilename).
-        ]).
+        menu addItem:(MenuItem 
+                        label:aFile asString 
+                        itemValue:[
+                            self setCurrentFileName:(aFile path asFilename).
+                        ]).
     ].
     menu addSeparator.
 
@@ -9312,11 +9320,11 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.528 2013-06-07 09:58:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.529 2013-06-21 00:45:40 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.528 2013-06-07 09:58:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.529 2013-06-21 00:45:40 cg Exp $'
 !
 
 version_HG