michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-05-04 22:30:33 +01:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Deal with URL characters in filenames, and long filenames

Browse Source
This commit is contained in:
Jamie Cameron
2020-01-03 18:43:14 -08:00
parent 54365d56d1
commit 161fa33de3
1 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
mailboxes/folders-lib.pl
View File

@@ -3316,7 +3316,11 @@ foreach my $a (@$attach) {
elsif ($a->{'filename'}) {
# Known filename
$fn = &decode_mimewords($a->{'filename'});
push(@files, $fn);
local $shortfn = $fn;
if (length($shortfn) > 80) {
$shortfn = substr($shortfn, 0, 80)."...";
}
push(@files, $shortfn);
push(@detach, [ $a->{'idx'}, $fn ]);
}
else {
@@ -3332,7 +3336,7 @@ foreach my $a (@$attach) {
}
$fn =~ s/ /_/g;
$fn =~ s/\#/_/g;
$fn = &html_escape($fn);
$fn = &urlize($fn);
local @a;
local $detachfile = $detachurl;
$detachfile =~ s/\?/\/$fn\?/;