class: FileBrowserV2
changed:
#installInLauncher
#menuFileHistory
MenuItem creation code cleanup
--- a/FileBrowserV2.st Tue Jul 08 15:26:07 2014 +0200
+++ b/FileBrowserV2.st Tue Jul 08 15:28:27 2014 +0200
@@ -237,7 +237,6 @@
"/ space:true.
menuItem := MenuItem new
- translateLabel: true;
value: action;
isButton: true;
"label:'File Browser'" icon:icon;
@@ -2377,10 +2376,12 @@
"aFileItem fileName exists" true ifTrue:[
menu addItem:(MenuItem
label: aFileItem fileName asString
- itemValue:[
- self setCurrentFileName:(aFileItem fileName).
- self openApplByFileItem:aFileItem
- ]).
+ itemValue:
+ [
+ self setCurrentFileName:(aFileItem fileName).
+ self openApplByFileItem:aFileItem
+ ]
+ translateLabel:false).
] ifFalse:[
removeCol add:aFileItem.
]
@@ -2390,7 +2391,6 @@
hist remove:el.
].
removeItem := MenuItem new.
- removeItem translateLabel:true.
text := resources string:'Clear History'.
"/ text := LabelAndIcon icon:(self class clearHistoryIcon) string:text.
removeItem label:text.
@@ -2587,11 +2587,11 @@
!FileBrowserV2 class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.224 2014-07-05 08:15:06 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.225 2014-07-08 13:28:27 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.224 2014-07-05 08:15:06 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.225 2014-07-08 13:28:27 cg Exp $'
! !