oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix handling filenames with space with overwrite=1 in fileImport.pl. Fixes bug #11453

Browse source
This commit is contained in:
Colin Kuskie 2010-03-03 13:27:30 -08:00
parent 53d63bcd57
commit b4a790a736
2 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

1
docs/changelog/7.x.x.txt
View file

@ -7,6 +7,7 @@
- fixed #11443: no language switch in rich edit - fixed #11443: no language switch in rich edit
- fixed #11450: How to lock yourself out of your WebGUI site... - fixed #11450: How to lock yourself out of your WebGUI site...
- fixed #11402: Survey TAP module requirements - fixed #11402: Survey TAP module requirements
- fixed #11453: fileUpload.pl does not handle files with spaces, overwriting
7.8.13 7.8.13
- fixed #11418: confusing typ-o in gotcha - fixed #11418: confusing typ-o in gotcha

7
sbin/fileImport.pl
View file

@ -266,14 +266,15 @@ sub buildFileList {
exit 2; exit 2;
} }
my $filename = $session->url->urlize($file);
push(@filelist, { push(@filelist, {
ext=>$ext, ext=>$ext,
filename=>$file, filename=>$filename,
fullPathFile => $fullpathfile, fullPathFile => $fullpathfile,
}); });
$filelisthash{$file} = $fullpathfile; $filelisthash{$filename} = $fullpathfile;
print "Found file $file.\n" unless ($quiet); print "Found file $file as $filename.\n" unless ($quiet);
} }
# TB : the recursive call # TB : the recursive call
push(@filelist, buildFileList($now,"$fullpathfile")) if ((-d "$fullpathfile") && $recursive); push(@filelist, buildFileList($now,"$fullpathfile")) if ((-d "$fullpathfile") && $recursive);