Fix handling filenames with space with overwrite=1 in fileImport.pl. Fixes bug #11453
This commit is contained in:
parent
53d63bcd57
commit
b4a790a736
2 changed files with 5 additions and 3 deletions
|
|
@ -7,6 +7,7 @@
|
|||
- fixed #11443: no language switch in rich edit
|
||||
- fixed #11450: How to lock yourself out of your WebGUI site...
|
||||
- fixed #11402: Survey TAP module requirements
|
||||
- fixed #11453: fileUpload.pl does not handle files with spaces, overwriting
|
||||
|
||||
7.8.13
|
||||
- fixed #11418: confusing typ-o in gotcha
|
||||
|
|
|
|||
|
|
@ -266,14 +266,15 @@ sub buildFileList {
|
|||
exit 2;
|
||||
}
|
||||
|
||||
my $filename = $session->url->urlize($file);
|
||||
push(@filelist, {
|
||||
ext=>$ext,
|
||||
filename=>$file,
|
||||
filename=>$filename,
|
||||
fullPathFile => $fullpathfile,
|
||||
});
|
||||
|
||||
$filelisthash{$file} = $fullpathfile;
|
||||
print "Found file $file.\n" unless ($quiet);
|
||||
$filelisthash{$filename} = $fullpathfile;
|
||||
print "Found file $file as $filename.\n" unless ($quiet);
|
||||
}
|
||||
# TB : the recursive call
|
||||
push(@filelist, buildFileList($now,"$fullpathfile")) if ((-d "$fullpathfile") && $recursive);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue