Hello community, here is the log from the commit of package perl-MIME-tools for openSUSE:Factory checked in at Thu Mar 10 11:25:23 CET 2011.
-------- --- perl-MIME-tools/perl-MIME-tools.changes 2011-02-21 10:12:29.000000000 +0100 +++ /mounts/work_src_done/STABLE/perl-MIME-tools/perl-MIME-tools.changes 2011-03-09 11:49:46.000000000 +0100 @@ -1,0 +2,11 @@ +Wed Mar 9 10:42:50 UTC 2011 - [email protected] + +- update to 5.502 +* NOTE to packagers (Debian, Red Hat, FreeBSD, etc.): Do not ship +MIME::tools 5.500 or 5.501. They both had serious bugs! +* Fix parsing bug: https://rt.cpan.org/Ticket/Display.html?id=66025 +* Fix typo: https://rt.cpan.org/Ticket/Display.html?id=65387 +* Fix unit tests on Perl 5.8.x: https://rt.cpan.org/Ticket/Display.html?id=66188 +* Fix unit test failure on Win32: (https://rt.cpan.org/Ticket/Display.html?id=66286) + +------------------------------------------------------------------- calling whatdependson for head-i586 Old: ---- MIME-tools-5.501.tar.bz2 New: ---- MIME-tools-5.502.tar.bz2 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-MIME-tools.spec ++++++ --- /var/tmp/diff_new_pack.cc3MvS/_old 2011-03-10 11:22:44.000000000 +0100 +++ /var/tmp/diff_new_pack.cc3MvS/_new 2011-03-10 11:22:44.000000000 +0100 @@ -29,7 +29,7 @@ Requires: perl-IO-stringy perl-MailTools perl-Convert-BinHex AutoReqProv: on Summary: modules for parsing (and creating!) MIME entities -Version: 5.501 +Version: 5.502 Release: 1 Source: MIME-tools-%{version}.tar.bz2 BuildRoot: %{_tmppath}/%{name}-%{version}-build ++++++ MIME-tools-5.501.tar.bz2 -> MIME-tools-5.502.tar.bz2 ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/ChangeLog new/MIME-tools-5.502/ChangeLog --- old/MIME-tools-5.501/ChangeLog 2011-02-17 19:33:17.000000000 +0100 +++ new/MIME-tools-5.502/ChangeLog 2011-03-08 14:59:40.000000000 +0100 @@ -1,3 +1,18 @@ +5.502 2011-03-08 David F. Skoll <[email protected]> + + * VERSION 5.502 RELEASED + + * NOTE to packagers (Debian, Red Hat, FreeBSD, etc.): Do not ship + MIME::tools 5.500 or 5.501. They both had serious bugs! + + * Fix parsing bug: https://rt.cpan.org/Ticket/Display.html?id=66025 + + * Fix typo: https://rt.cpan.org/Ticket/Display.html?id=65387 + + * Fix unit tests on Perl 5.8.x: https://rt.cpan.org/Ticket/Display.html?id=66188 + + * Fix unit test failure on Win32: (https://rt.cpan.org/Ticket/Display.html?id=66286) + 5.501 2011-02-17 David F. Skoll <[email protected]> * VERSION 5.501 RELEASED diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/MANIFEST new/MIME-tools-5.502/MANIFEST --- old/MIME-tools-5.501/MANIFEST 2011-02-17 17:38:58.000000000 +0100 +++ new/MIME-tools-5.502/MANIFEST 2011-02-22 22:32:07.000000000 +0100 @@ -75,6 +75,7 @@ t/ticket-52924.t t/ticket-60931.t t/ticket-65681.t +t/ticket-66025.t t/WordDecoder.t t/WordEncoder.t t/Words.t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/META.yml new/MIME-tools-5.502/META.yml --- old/MIME-tools-5.501/META.yml 2011-02-17 19:33:52.000000000 +0100 +++ new/MIME-tools-5.502/META.yml 2011-03-08 15:00:27.000000000 +0100 @@ -35,4 +35,4 @@ perl: 5.8.0 resources: license: http://dev.perl.org/licenses/ -version: 5.501 +version: 5.502 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Body.pm new/MIME-tools-5.502/lib/MIME/Body.pm --- old/MIME-tools-5.501/lib/MIME/Body.pm 2011-02-17 19:17:15.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Body.pm 2011-03-08 14:59:59.000000000 +0100 @@ -141,7 +141,7 @@ use IO::File; ### The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; #------------------------------ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Decoder/Base64.pm new/MIME-tools-5.502/lib/MIME/Decoder/Base64.pm --- old/MIME-tools-5.501/lib/MIME/Decoder/Base64.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Decoder/Base64.pm 2011-03-08 14:59:59.000000000 +0100 @@ -58,7 +58,7 @@ @ISA = qw(MIME::Decoder); ### The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; ### How many bytes to encode at a time (must be a multiple of 3, and ### less than (76 * 0.75)! diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Decoder/BinHex.pm new/MIME-tools-5.502/lib/MIME/Decoder/BinHex.pm --- old/MIME-tools-5.501/lib/MIME/Decoder/BinHex.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Decoder/BinHex.pm 2011-03-08 14:59:59.000000000 +0100 @@ -45,7 +45,7 @@ @ISA = qw(MIME::Decoder); # The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; #------------------------------ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Decoder/Binary.pm new/MIME-tools-5.502/lib/MIME/Decoder/Binary.pm --- old/MIME-tools-5.501/lib/MIME/Decoder/Binary.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Decoder/Binary.pm 2011-03-08 14:59:59.000000000 +0100 @@ -45,7 +45,7 @@ @ISA = qw(MIME::Decoder); ### The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; ### Buffer length: my $BUFLEN = 8192; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Decoder/Gzip64.pm new/MIME-tools-5.502/lib/MIME/Decoder/Gzip64.pm --- old/MIME-tools-5.501/lib/MIME/Decoder/Gzip64.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Decoder/Gzip64.pm 2011-03-08 14:59:59.000000000 +0100 @@ -61,7 +61,7 @@ @ISA = qw(MIME::Decoder::Base64); # The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; # How to compress stdin to stdout: $GZIP = "gzip -c"; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Decoder/NBit.pm new/MIME-tools-5.502/lib/MIME/Decoder/NBit.pm --- old/MIME-tools-5.501/lib/MIME/Decoder/NBit.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Decoder/NBit.pm 2011-03-08 14:59:59.000000000 +0100 @@ -96,7 +96,7 @@ @ISA = qw(MIME::Decoder); ### The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; ### How many bytes to decode at a time? my $DecodeChunkLength = 8 * 1024; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Decoder/QuotedPrint.pm new/MIME-tools-5.502/lib/MIME/Decoder/QuotedPrint.pm --- old/MIME-tools-5.501/lib/MIME/Decoder/QuotedPrint.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Decoder/QuotedPrint.pm 2011-03-08 14:59:59.000000000 +0100 @@ -56,7 +56,7 @@ @ISA = qw(MIME::Decoder); # The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; #------------------------------ # If we have MIME::QuotedPrint 3.03 or later, use the three-argument diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Decoder/UU.pm new/MIME-tools-5.502/lib/MIME/Decoder/UU.pm --- old/MIME-tools-5.501/lib/MIME/Decoder/UU.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Decoder/UU.pm 2011-03-08 14:59:59.000000000 +0100 @@ -47,7 +47,7 @@ @ISA = qw(MIME::Decoder); # The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; #------------------------------ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Decoder.pm new/MIME-tools-5.502/lib/MIME/Decoder.pm --- old/MIME-tools-5.501/lib/MIME/Decoder.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Decoder.pm 2011-03-08 14:59:59.000000000 +0100 @@ -126,7 +126,7 @@ ); ### The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; ### Me: my $ME = 'MIME::Decoder'; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Entity.pm new/MIME-tools-5.502/lib/MIME/Entity.pm --- old/MIME-tools-5.501/lib/MIME/Entity.pm 2011-02-17 19:17:25.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Entity.pm 2011-03-08 14:59:59.000000000 +0100 @@ -245,7 +245,7 @@ #------------------------------ ### The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; ### Boundary counter: my $BCount = 0; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Field/ConTraEnc.pm new/MIME-tools-5.502/lib/MIME/Field/ConTraEnc.pm --- old/MIME-tools-5.501/lib/MIME/Field/ConTraEnc.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Field/ConTraEnc.pm 2011-03-08 14:59:59.000000000 +0100 @@ -47,7 +47,7 @@ @ISA = qw(MIME::Field::ParamVal); # The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; # Install it: bless([])->register('Content-transfer-encoding'); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Field/ContDisp.pm new/MIME-tools-5.502/lib/MIME/Field/ContDisp.pm --- old/MIME-tools-5.501/lib/MIME/Field/ContDisp.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Field/ContDisp.pm 2011-03-08 14:59:59.000000000 +0100 @@ -48,7 +48,7 @@ @ISA = qw(MIME::Field::ParamVal); # The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; # Install it: bless([])->register('Content-disposition'); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Field/ContType.pm new/MIME-tools-5.502/lib/MIME/Field/ContType.pm --- old/MIME-tools-5.501/lib/MIME/Field/ContType.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Field/ContType.pm 2011-03-08 14:59:59.000000000 +0100 @@ -63,7 +63,7 @@ @ISA = qw(MIME::Field::ParamVal); # The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; # Install it: bless([])->register('Content-type'); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Field/ParamVal.pm new/MIME-tools-5.502/lib/MIME/Field/ParamVal.pm --- old/MIME-tools-5.501/lib/MIME/Field/ParamVal.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Field/ParamVal.pm 2011-03-08 14:59:59.000000000 +0100 @@ -79,7 +79,7 @@ #------------------------------ # The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; #------------------------------ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Head.pm new/MIME-tools-5.502/lib/MIME/Head.pm --- old/MIME-tools-5.501/lib/MIME/Head.pm 2011-02-17 19:27:15.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Head.pm 2011-03-08 14:59:59.000000000 +0100 @@ -138,7 +138,7 @@ #------------------------------ ### The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; ### Sanity (we put this test after our own version, for CPAN::): use Mail::Header 1.06 (); @@ -366,7 +366,7 @@ character set: thus, the Q-encoding C<=F8> is simply translated to the octet (hexadecimal C<F8>), period. For piece-by-piece decoding of a given field, you want the array context of -C<MIME::Word::decode_mimewords()>. +C<MIME::Words::decode_mimewords()>. B<Warning:> the CRLF+SPACE separator that splits up long encoded words into shorter sequences (see the Subject: example above) gets lost diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Parser.pm new/MIME-tools-5.502/lib/MIME/Parser.pm --- old/MIME-tools-5.501/lib/MIME/Parser.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Parser.pm 2011-03-08 15:00:00.000000000 +0100 @@ -153,7 +153,7 @@ #------------------------------ ### The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; ### How to catenate: $CAT = '/bin/cat'; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Tools.pm new/MIME-tools-5.502/lib/MIME/Tools.pm --- old/MIME-tools-5.501/lib/MIME/Tools.pm 2011-02-17 17:37:45.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Tools.pm 2011-03-08 14:59:56.000000000 +0100 @@ -28,7 +28,7 @@ Exporter::export_ok_tags('config', 'msgs', 'msgtypes', 'utils'); # The TOOLKIT version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; # Configuration (do NOT alter this directly)... # All legal CONFIG vars *must* be in here, even if only to be set to undef: diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/lib/MIME/Words.pm new/MIME-tools-5.502/lib/MIME/Words.pm --- old/MIME-tools-5.501/lib/MIME/Words.pm 2011-02-17 17:37:49.000000000 +0100 +++ new/MIME-tools-5.502/lib/MIME/Words.pm 2011-03-08 15:00:00.000000000 +0100 @@ -93,7 +93,7 @@ #------------------------------ ### The package version, both in 1.23 style *and* usable by MakeMaker: -$VERSION = "5.501"; +$VERSION = "5.502"; ### Nonprintables (controls + x7F + 8bit): my $NONPRINT = "\\x00-\\x1F\\x7F-\\xFF"; @@ -215,7 +215,7 @@ (.*? # shortest possible string, \n*) # followed by 0 or more NLs, (?=(\Z|=\?)) # terminated by "=?" or EOS - }xg) { + }sxg) { length($1) or die "MIME::Words: internal logic err: empty token\n"; push @tokens, [$1]; next; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/t/Filer.t new/MIME-tools-5.502/t/Filer.t --- old/MIME-tools-5.501/t/Filer.t 2011-01-31 21:56:08.000000000 +0100 +++ new/MIME-tools-5.502/t/Filer.t 2011-02-23 15:24:18.000000000 +0100 @@ -3,9 +3,21 @@ use warnings; use Test::More tests => 17; +use Config; + binmode(STDOUT, ":utf8"); binmode(STDERR, ":utf8"); +# Perl < 5.10.0 did not handle Unicode at all... +my $wookie; + +if ($Config{'PERL_REVISION'} == 5 && + $Config{'PERL_VERSION'} <= 8) { + $wookie = 'wookie%D0.doc'; +} else { + $wookie = 'wookie%42D.doc'; +} + BEGIN { use_ok('MIME::Parser::Filer'); } @@ -23,7 +35,7 @@ '..' => '...dat', 'index[1].html' => '.html', " wookie\x{f8}.doc" => "wookie%F8.doc", - " wookie\x{042d}.doc" => "wookie%42D.doc", + " wookie\x{042d}.doc" => $wookie, ); foreach my $name (keys %evil) { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/t/attachment-filename-encoding.t new/MIME-tools-5.502/t/attachment-filename-encoding.t --- old/MIME-tools-5.501/t/attachment-filename-encoding.t 2011-01-31 20:36:48.000000000 +0100 +++ new/MIME-tools-5.502/t/attachment-filename-encoding.t 2011-03-01 16:34:48.000000000 +0100 @@ -3,6 +3,7 @@ use strict; use warnings; use Test::More; +use File::Temp qw(tempdir); use utf8; binmode STDOUT, ":utf8"; @@ -44,9 +45,10 @@ # CPAN ticket #65162 # We need the default parser to tickle the bug + my $dir = tempdir(CLEANUP => 1); $parser = MIME::Parser->new(); $parser->output_to_core(0); - $parser->output_under('/tmp'); + $parser->output_under($dir); $entity = $parser->parse_data("From: test\@example.com\nSubject: test\nDate: Tue, 25 Jan 2011 14:35:04 +0100\nMessage-Id: <123\@example.com>\nContent-Type: text/plain; name*=utf-8''%CE%B2CURE%2Etxt\n\ntest\n"); $filename = $entity->head->recommended_filename; is(utf8::is_utf8($filename), 1, "Parsed filename should have UTF-8 flag on"); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MIME-tools-5.501/t/ticket-66025.t new/MIME-tools-5.502/t/ticket-66025.t --- old/MIME-tools-5.501/t/ticket-66025.t 1970-01-01 01:00:00.000000000 +0100 +++ new/MIME-tools-5.502/t/ticket-66025.t 2011-02-22 22:31:20.000000000 +0100 @@ -0,0 +1,8 @@ +use Test::More tests => 1; +use Test::Deep; + +use MIME::Words; + +cmp_deeply(MIME::Words::decode_mimewords("\nx"), + ["\nx"], + "Fix for ticket #66025 passes"); ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected]
