FileBrowser.st
changeset 14606 3269a6c61a23
parent 14499 44b03221ff92
child 14743 9d69f7d241cf
--- a/FileBrowser.st	Tue Jul 08 16:40:30 2014 +0200
+++ b/FileBrowser.st	Tue Jul 08 16:40:53 2014 +0200
@@ -482,7 +482,6 @@
 !
 
 bookmarksMenuSpec
-
     <resource: #programMenu>
 
     |menu bookmarks|
@@ -495,14 +494,11 @@
     bookmarks size > 0 ifTrue:[
         menu addSeparator.
         bookmarks do:[:dirName |
-            |pathName|
-
-            pathName := dirName asFilename pathName.
             menu addItem:((MenuItem 
-                            label:pathName 
-                            itemValue:#changeDirectoryTo:)
-                                argument:dirName;
-                                yourself).
+                            label:(dirName asFilename pathName) 
+                            itemValue:#changeDirectoryTo:
+                            argument:dirName)
+                                translateLabel:false).
         ].
     ].
     ^ menu
@@ -633,9 +629,9 @@
             dirName := item path.
             m addItem:((MenuItem 
                             label:dirName 
-                            itemValue:#changeDirectoryTo:)
-                                argument:dirName;
-                                yourself).
+                            itemValue:#changeDirectoryTo:
+                            argument:dirName)
+                                translateLabel:false).
         ].
     ].
 
@@ -7443,10 +7439,10 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.662 2014-06-14 09:06:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.663 2014-07-08 14:40:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.662 2014-06-14 09:06:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.663 2014-07-08 14:40:53 cg Exp $'
 ! !