class: AbstractFileBrowser
changed:
#copySelectionToRepairingCorruptedFiles:
#moveSelectionTo
--- a/AbstractFileBrowser.st Fri Jul 04 12:29:48 2014 +0200
+++ b/AbstractFileBrowser.st Fri Jul 04 15:19:12 2014 +0200
@@ -4821,11 +4821,11 @@
selectedFiles isEmptyOrNil ifTrue:[^ self].
msg := (selectedFiles size > 1)
- ifTrue:[ 'Copy Selected Items To Directory:' ]
- ifFalse:[ 'Copy "%1" To Directory:' ].
+ ifTrue:[ 'Copy Selected Items to Directory:' ]
+ ifFalse:[ 'Copy "%1" to Directory:' ].
destination := Dialog
- requestDirectoryName:(resources stringWithCRs:msg with:selectedFiles first pathName)
+ requestDirectoryName:(resources stringWithCRs:msg with:selectedFiles first baseName)
default:(LastMoveDestination ? self currentDirectory)
ok:(resources string:'Copy')
abort:nil.
@@ -4973,7 +4973,7 @@
|destinationDirectory|
destinationDirectory := Dialog
- requestDirectoryName:(resources stringWithCRs:'Move Selected Items To:')
+ requestDirectoryName:(resources stringWithCRs:'Move Selected Items to Directory:')
default:(LastMoveDestination ? self currentDirectory)
ok:(resources string:'Move')
abort:nil.
@@ -9560,10 +9560,10 @@
!AbstractFileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.563 2014-07-04 10:22:42 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.564 2014-07-04 13:19:12 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.563 2014-07-04 10:22:42 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.564 2014-07-04 13:19:12 cg Exp $'
! !