Hello community, here is the log from the commit of package perl-MIME-tools for openSUSE:Factory checked in at 2016-05-31 12:25:19 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-MIME-tools (Old) and /work/SRC/openSUSE:Factory/.perl-MIME-tools.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-MIME-tools" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-MIME-tools/perl-MIME-tools.changes 2015-10-03 20:30:42.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-MIME-tools.new/perl-MIME-tools.changes 2016-05-31 12:25:20.000000000 +0200 @@ -1,0 +2,6 @@ +Mon May 30 13:42:42 UTC 2016 - bwiedem...@suse.com + +- Add MIME-tools-5.507-rt113887.patch from fedora + to fix test failure with new MailTools + +------------------------------------------------------------------- New: ---- MIME-tools-5.507-rt113887.patch ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-MIME-tools.spec ++++++ --- /var/tmp/diff_new_pack.NZVDFf/_old 2016-05-31 12:25:21.000000000 +0200 +++ /var/tmp/diff_new_pack.NZVDFf/_new 2016-05-31 12:25:21.000000000 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-MIME-tools # -# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany. +# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -26,6 +26,7 @@ Url: http://search.cpan.org/dist/MIME-tools/ Source0: http://www.cpan.org/authors/id/D/DS/DSKOLL/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml +Patch0: MIME-tools-5.507-rt113887.patch BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl @@ -47,6 +48,7 @@ %prep %setup -q -n %{cpan_name}-%{version} +%patch0 -p1 find . -type f -print0 | xargs -0 chmod 644 %build ++++++ MIME-tools-5.507-rt113887.patch ++++++ diff --git a/MANIFEST b/MANIFEST index c2a49ad..6cf638f 100644 --- a/MANIFEST +++ b/MANIFEST @@ -155,6 +155,7 @@ testmsgs/german.msg testmsgs/german.ref testmsgs/hdr-fakeout.msg testmsgs/hdr-fakeout.ref +testmsgs/hdr-fakeout-newmailtools-ref testmsgs/malformed-content-type-zip.msg testmsgs/multi-2evil.msg testmsgs/multi-2evil.ref diff --git a/t/Ref.t b/t/Ref.t index b3fc985..d39d20b 100644 --- a/t/Ref.t +++ b/t/Ref.t @@ -39,6 +39,10 @@ foreach my $refpath (@refpaths) { my $msgpath = $refpath; $msgpath =~ s/\.ref$/.msg/; # print STDERR " $msgpath\n"; + ### HACK HACK HACK: MailTools behaviour has changed!!! + if ($msgpath eq 'testmsgs/hdr-fakeout.msg' && $::Mail::Header::VERSION > 2.14) { + $refpath = 'testmsgs/hdr-fakeout-newmailtools-ref'; + } ### Get reference, as ref to array: my $ref = read_ref($refpath); if ($ref->{Parser}{Message}) { diff --git a/testmsgs/hdr-fakeout-newmailtools-ref b/testmsgs/hdr-fakeout-newmailtools-ref new file mode 100644 index 0000000..b6e9329 --- /dev/null +++ b/testmsgs/hdr-fakeout-newmailtools-ref @@ -0,0 +1,16 @@ +{ + "Parser" => { + "Message" => "testmsgs/hdr-fakeout.msg", + "ExtractNested" => 1, + "OutputToCore" => "0", + "Name" => "anonymous" + }, + "Msg" => { + "Subject" => "test message 1", + "Type" => "text/plain", + "To" => "\"Russell P. Sutherland\" <russ\@quist.on.ca>", + "From" => "\"Russell P. Sutherland\" <russ\@quist.on.ca>", + "Encoding" => "7bit" + } +} +
