12 lines
428 B
Diff
12 lines
428 B
Diff
|
--- Tk/FBox.pm.orig 2009-06-22 19:18:49.000000000 +0200
|
||
|
|
+++ Tk/FBox.pm 2009-06-22 19:19:30.000000000 +0200
|
||
|
|
@@ -906,7 +906,7 @@
|
||
|
|
if ($w->cget('-multiple')) {
|
||
|
|
$selectFilePath = [];
|
||
|
|
for my $f (@{ $w->{'selectFile'} }) {
|
||
|
|
- push @$selectFilePath, JoinFile($w->_get_select_Path, $f);
|
||
|
|
+ push @$selectFilePath, JoinFile($w->_get_select_path, $f);
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
$selectFilePath = JoinFile($w->_get_select_path,
|