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 - vcizek@novell.com
+
+- 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
+
+ * 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
* 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
-CMIME::Word::decode_mimewords().
+CMIME::Words::decode_mimewords().
BWarning: 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: opensuse-commit+unsubscribe@opensuse.org
For additional commands, e-mail: opensuse-commit+help@opensuse.org