BugTrack-wiki/351 : Edgeブラウザーにおけるダウンロードファイル名の文字化け対応

diff --git a/lib/Util.pm b/lib/Util.pm
index e7f8f0f..43a78c6 100644 (file)
--- a/lib/Util.pm
+++ b/lib/Util.pm
@@ -723,7 +723,7 @@ sub make_content_disposition {
        my ($filename, $disposition) = @_;
        my $ua = $ENV{"HTTP_USER_AGENT"};
        eval("use MIME::Base64;");
-       my $encoded = ( $ua =~ /MSIE|Trident/i   ? Jcode->new($filename)->sjis
+       my $encoded = ( $ua =~ /MSIE|Trident|Edge/i ? Jcode->new($filename)->sjis
                      : $ua =~ /Chrome|Firefox/i ? "=?utf-8?B?".MIME::Base64::encode_base64(Jcode->new($filename)->utf8,'')."?="
                      : Jcode->new($filename)->utf8 );
        return "Content-Disposition: $disposition;filename=\"".$encoded."\"\n\n";