Commit 6de90de1 authored by gerv%gerv.net's avatar gerv%gerv.net

Bug 441541 - Email::MIME->as_string gives SCALAR for body with mismatched…

Bug 441541 - Email::MIME->as_string gives SCALAR for body with mismatched Email:: modules. Patch by gerv; r,a=mkanat.
parent 4d9a1326
...@@ -57,7 +57,7 @@ sub REQUIRED_MODULES { ...@@ -57,7 +57,7 @@ sub REQUIRED_MODULES {
my $perl_ver = sprintf('%vd', $^V); my $perl_ver = sprintf('%vd', $^V);
my @modules = ( my @modules = (
{ {
package => 'CGI', package => 'CGI.pm',
module => 'CGI', module => 'CGI',
# Perl 5.10 requires CGI 3.33 due to a taint issue when # Perl 5.10 requires CGI 3.33 due to a taint issue when
# uploading attachments, see bug 416382. # uploading attachments, see bug 416382.
...@@ -96,7 +96,7 @@ sub REQUIRED_MODULES { ...@@ -96,7 +96,7 @@ sub REQUIRED_MODULES {
{ {
package => 'Email-MIME-Modifier', package => 'Email-MIME-Modifier',
module => 'Email::MIME::Modifier', module => 'Email::MIME::Modifier',
version => 0 version => '1.442'
}, },
); );
...@@ -238,7 +238,7 @@ sub OPTIONAL_MODULES { ...@@ -238,7 +238,7 @@ sub OPTIONAL_MODULES {
# check is only relevant with Perl 5.8.x. # check is only relevant with Perl 5.8.x.
my $perl_ver = sprintf('%vd', $^V); my $perl_ver = sprintf('%vd', $^V);
if (vers_cmp($perl_ver, '5.10') < 0) { if (vers_cmp($perl_ver, '5.10') < 0) {
push(@modules, { package => 'CGI', push(@modules, { package => 'CGI.pm',
module => 'CGI', module => 'CGI',
version => '3.11', version => '3.11',
feature => 'mod_perl' }); feature => 'mod_perl' });
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment