Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-Encode for openSUSE:Factory checked in at 2022-06-28 15:21:32 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Encode (Old) and /work/SRC/openSUSE:Factory/.perl-Encode.new.1548 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Encode" Tue Jun 28 15:21:32 2022 rev:22 rq:985283 version:3.18 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Encode/perl-Encode.changes 2022-04-14 17:25:52.343291925 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Encode.new.1548/perl-Encode.changes 2022-06-28 15:21:42.393882762 +0200 @@ -1,0 +2,6 @@ +Sun Jun 26 03:08:19 UTC 2022 - Tina M??ller <[email protected]> + +- updated to 3.18 + see /usr/share/doc/packages/perl-Encode/Changes + +------------------------------------------------------------------- Old: ---- Encode-3.17.tar.gz New: ---- Encode-3.18.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Encode.spec ++++++ --- /var/tmp/diff_new_pack.PjueHb/_old 2022-06-28 15:21:42.809883383 +0200 +++ /var/tmp/diff_new_pack.PjueHb/_new 2022-06-28 15:21:42.813883388 +0200 @@ -18,7 +18,7 @@ %define cpan_name Encode Name: perl-Encode -Version: 3.17 +Version: 3.18 Release: 0 License: Artistic-1.0 OR GPL-1.0-or-later Summary: Character encodings in Perl ++++++ Encode-3.17.tar.gz -> Encode-3.18.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/Changes new/Encode-3.18/Changes --- old/Encode-3.17/Changes 2022-04-07 05:06:43.000000000 +0200 +++ new/Encode-3.18/Changes 2022-06-25 04:05:03.000000000 +0200 @@ -1,8 +1,17 @@ # Revision history for Perl extension Encode. # -# $Id: Changes,v 3.17 2022/04/07 03:06:40 dankogai Exp dankogai $ +# $Id: Changes,v 3.18 2022/06/25 02:05:01 dankogai Exp dankogai $ # -$Revision: 3.17 $ $Date: 2022/04/07 03:06:40 $ +$Revision: 3.18 $ $Date: 2022/06/25 02:05:01 $ +! lib/Encode/MIME/Header.pm t/mime-header.t + Pulled: Encode::MIME::Header: Fix base64 word decoding + https://github.com/dankogai/p5-encode/pull/169 +! t/Unicode_trailing_nul.t t/truncated_utf8.t + t/utf32warnings.t t/xml.t + Skip so Github Actions are happy + https://github.com/dankogai/p5-encode/blob/main/.github/workflows/versions.yml + +3.17 2022/04/07 03:06:40 ! bin/enc2xs t/enc_data.t t/enc_module.t t/encoding.t t/jperl.t Pulled: Fix Issue #144, spurious warnings from -Wc++-compate, and a few related nits diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/Encode.pm new/Encode-3.18/Encode.pm --- old/Encode-3.17/Encode.pm 2022-04-07 05:06:43.000000000 +0200 +++ new/Encode-3.18/Encode.pm 2022-06-25 04:05:03.000000000 +0200 @@ -1,5 +1,5 @@ # -# $Id: Encode.pm,v 3.17 2022/04/07 03:05:51 dankogai Exp $ +# $Id: Encode.pm,v 3.18 2022/06/25 02:04:06 dankogai Exp $ # package Encode; use strict; @@ -7,7 +7,7 @@ use constant DEBUG => !!$ENV{PERL_ENCODE_DEBUG}; our $VERSION; BEGIN { - $VERSION = sprintf "%d.%02d", q$Revision: 3.17 $ =~ /(\d+)/g; + $VERSION = sprintf "%d.%02d", q$Revision: 3.18 $ =~ /(\d+)/g; require XSLoader; XSLoader::load( __PACKAGE__, $VERSION ); } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/META.json new/Encode-3.18/META.json --- old/Encode-3.17/META.json 2022-04-07 05:15:35.000000000 +0200 +++ new/Encode-3.18/META.json 2022-06-25 04:05:46.000000000 +0200 @@ -4,7 +4,7 @@ "Dan Kogai <[email protected]>" ], "dynamic_config" : 1, - "generated_by" : "ExtUtils::MakeMaker version 7.62, CPAN::Meta::Converter version 2.150010", + "generated_by" : "ExtUtils::MakeMaker version 7.64, CPAN::Meta::Converter version 2.150010", "license" : [ "perl_5" ], @@ -49,7 +49,7 @@ "url" : "https://github.com/dankogai/p5-encode"; } }, - "version" : "3.17", + "version" : "3.18", "x_contributors" : [ "Alex Davies <[email protected]>", "Alex Kapranoff <[email protected]>", @@ -135,5 +135,5 @@ "Vincent van Dam <[email protected]>", "Yitzchak Scott-Thoennes <[email protected]>" ], - "x_serialization_backend" : "JSON::PP version 4.06" + "x_serialization_backend" : "JSON::PP version 4.07" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/META.yml new/Encode-3.18/META.yml --- old/Encode-3.17/META.yml 2022-04-07 05:15:35.000000000 +0200 +++ new/Encode-3.18/META.yml 2022-06-25 04:05:45.000000000 +0200 @@ -8,7 +8,7 @@ configure_requires: ExtUtils::MakeMaker: '0' dynamic_config: 1 -generated_by: 'ExtUtils::MakeMaker version 7.62, CPAN::Meta::Converter version 2.150010' +generated_by: 'ExtUtils::MakeMaker version 7.64, CPAN::Meta::Converter version 2.150010' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -24,7 +24,7 @@ parent: '0.221' resources: repository: https://github.com/dankogai/p5-encode -version: '3.17' +version: '3.18' x_contributors: - 'Alex Davies <[email protected]>' - 'Alex Kapranoff <[email protected]>' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/Makefile.PL new/Encode-3.18/Makefile.PL --- old/Encode-3.17/Makefile.PL 2022-04-07 05:06:46.000000000 +0200 +++ new/Encode-3.18/Makefile.PL 2022-06-25 04:05:03.000000000 +0200 @@ -1,5 +1,5 @@ # -# $Id: Makefile.PL,v 2.24 2021/10/13 08:29:13 dankogai Exp $ +# $Id: Makefile.PL,v 2.25 2022/06/25 01:58:57 dankogai Exp $ # use 5.007003; use strict; @@ -17,6 +17,8 @@ my $ccflags = $Config{ccflags}; if (!$ENV{PERL_CORE}) { if (my $gccver = $Config{gccversion}) { + # no more 'Argument "Apple" isn't numeric in addition (+)' + no warnings 'numeric'; $gccver =~ s/\.//g; $gccver =~ s/ .*//; $gccver .= "0" while length $gccver < 3; $gccver = 0+$gccver; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/lib/Encode/MIME/Header.pm new/Encode-3.18/lib/Encode/MIME/Header.pm --- old/Encode-3.17/lib/Encode/MIME/Header.pm 2022-04-07 05:06:52.000000000 +0200 +++ new/Encode-3.18/lib/Encode/MIME/Header.pm 2022-06-25 04:05:03.000000000 +0200 @@ -2,7 +2,7 @@ use strict; use warnings; -our $VERSION = do { my @r = ( q$Revision: 2.28 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r }; +our $VERSION = do { my @r = ( q$Revision: 2.29 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r }; use Carp (); use Encode (); @@ -55,7 +55,7 @@ # in strict mode check also for valid base64 characters and also for valid quoted printable codes my $re_encoding_strict_b = qr/[Bb]/; my $re_encoding_strict_q = qr/[Qq]/; -my $re_encoded_text_strict_b = qr/[0-9A-Za-z\+\/]*={0,2}/; +my $re_encoded_text_strict_b = qr/(?:[0-9A-Za-z\+\/]{4})*(?:[0-9A-Za-z\+\/]{2}==|[0-9A-Za-z\+\/]{3}=|)/; my $re_encoded_text_strict_q = qr/(?:[\x21-\x3C\x3E\x40-\x7E]|=[0-9A-Fa-f]{2})*/; # NOTE: first part are printable US-ASCII except ?, =, SPACE and TAB my $re_encoded_word_strict = qr/=\?$re_charset(?:\*$re_language)?\?(?:$re_encoding_strict_b\?$re_encoded_text_strict_b|$re_encoding_strict_q\?$re_encoded_text_strict_q)\?=/; my $re_capture_encoded_word_strict = qr/=\?($re_charset)((?:\*$re_language)?)\?($re_encoding_strict_b\?$re_encoded_text_strict_b|$re_encoding_strict_q\?$re_encoded_text_strict_q)\?=/; @@ -94,6 +94,10 @@ $stop = 1 unless length($line) or length($sep); + # in non strict mode append missing '=' padding characters for b words + # fixes below concatenation of consecutive encoded mime words + 1 while not $STRICT_DECODE and $line =~ s/(=\?$re_charset(?:\*$re_language)?\?[Bb]\?)((?:[^\?]{4})*[^\?]{1,3})(\?=)/$1.$2.('='x(4-length($2)%4)).$3/se; + # NOTE: this code partially could break $chk support # in non strict mode concat consecutive encoded mime words with same charset, language and encoding # fixes breaking inside multi-byte characters diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/t/Unicode_trailing_nul.t new/Encode-3.18/t/Unicode_trailing_nul.t --- old/Encode-3.17/t/Unicode_trailing_nul.t 2021-12-07 16:11:54.000000000 +0100 +++ new/Encode-3.18/t/Unicode_trailing_nul.t 2022-05-25 09:43:25.000000000 +0200 @@ -1,3 +1,9 @@ +BEGIN { + if ( $] < 5.009 ) { + print "1..0 # Skip: Perl <= 5.9 or later required\n"; + exit 0; + } +} use strict; use Test::More; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/t/enc_data.t new/Encode-3.18/t/enc_data.t --- old/Encode-3.17/t/enc_data.t 2022-04-07 05:06:55.000000000 +0200 +++ new/Encode-3.18/t/enc_data.t 2022-06-25 04:05:03.000000000 +0200 @@ -1,4 +1,4 @@ -# $Id: enc_data.t,v 2.6 2022/04/07 03:06:40 dankogai Exp dankogai $ +# $Id: enc_data.t,v 2.6 2022/04/07 03:06:40 dankogai Exp $ BEGIN { require Config; import Config; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/t/enc_module.t new/Encode-3.18/t/enc_module.t --- old/Encode-3.17/t/enc_module.t 2022-04-07 05:06:56.000000000 +0200 +++ new/Encode-3.18/t/enc_module.t 2022-06-25 04:05:03.000000000 +0200 @@ -1,4 +1,4 @@ -# $Id: enc_module.t,v 2.6 2022/04/07 03:06:40 dankogai Exp dankogai $ +# $Id: enc_module.t,v 2.6 2022/04/07 03:06:40 dankogai Exp $ # This file is in euc-jp BEGIN { require Config; import Config; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/t/jperl.t new/Encode-3.18/t/jperl.t --- old/Encode-3.17/t/jperl.t 2022-04-07 05:06:58.000000000 +0200 +++ new/Encode-3.18/t/jperl.t 2022-06-25 04:05:03.000000000 +0200 @@ -1,5 +1,5 @@ # -# $Id: jperl.t,v 2.6 2022/04/07 03:06:40 dankogai Exp dankogai $ +# $Id: jperl.t,v 2.6 2022/04/07 03:06:40 dankogai Exp $ # # This script is written in euc-jp diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/t/mime-header.t new/Encode-3.18/t/mime-header.t --- old/Encode-3.17/t/mime-header.t 2022-04-07 05:06:58.000000000 +0200 +++ new/Encode-3.18/t/mime-header.t 2022-06-25 04:05:03.000000000 +0200 @@ -1,5 +1,5 @@ # -# $Id: mime-header.t,v 2.15 2017/07/18 07:15:29 dankogai Exp $ +# $Id: mime-header.t,v 2.16 2022/06/25 01:58:57 dankogai Exp $ # This script is written in utf8 # BEGIN { @@ -24,7 +24,7 @@ use utf8; use charnames ":full"; -use Test::More tests => 266; +use Test::More tests => 274; BEGIN { use_ok("Encode::MIME::Header"); @@ -138,6 +138,11 @@ "=?utf-8-strict?Q?=C3=A1=f9=80=80=80=80?=" => "?????", # allow non-ASCII characters in q word "=?UTF-8?Q?\x{C3}\x{A1}?=" => "??", + # allow missing padding characters '=' in b word + "=?UTF-8?B?JQ?=" => "%", + "=?UTF-8?B?JQ?= =?UTF-8?B?JQ?=" => "%%", + "=?UTF-8?B?YWI?=" => "ab", + "=?UTF-8?B?YWI?= =?UTF-8?B?YWI?=" => "abab", ); my @decode_strict_tests = ( @@ -159,6 +164,11 @@ "=?utf-8-strict?Q?=C3=A1?=" => "=?utf-8-strict?Q?=C3=A1?=", # do not allow non-ASCII characters in q word "=?UTF-8?Q?\x{C3}\x{A1}?=" => "=?UTF-8?Q?\x{C3}\x{A1}?=", + # do not allow missing padding characters '=' in b word + "=?UTF-8?B?JQ?=" => "=?UTF-8?B?JQ?=", + "=?UTF-8?B?JQ?= =?UTF-8?B?JQ?=" => "=?UTF-8?B?JQ?= =?UTF-8?B?JQ?=", + "=?UTF-8?B?YWI?=" => "=?UTF-8?B?YWI?=", + "=?UTF-8?B?YWI?= =?UTF-8?B?YWI?=" => "=?UTF-8?B?YWI?= =?UTF-8?B?YWI?=", ); my @encode_tests = ( diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/t/truncated_utf8.t new/Encode-3.18/t/truncated_utf8.t --- old/Encode-3.17/t/truncated_utf8.t 2018-04-19 18:27:07.000000000 +0200 +++ new/Encode-3.18/t/truncated_utf8.t 2022-05-25 09:37:27.000000000 +0200 @@ -12,6 +12,10 @@ print "1..0 # Skip: EBCDIC\n"; exit 0; } + if ( $] < 5.009 ) { + print "1..0 # Skip: Perl <= 5.9 or later required\n"; + exit 0; + } $| = 1; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/t/utf32warnings.t new/Encode-3.18/t/utf32warnings.t --- old/Encode-3.17/t/utf32warnings.t 2018-06-28 13:28:27.000000000 +0200 +++ new/Encode-3.18/t/utf32warnings.t 2022-05-25 09:32:31.000000000 +0200 @@ -1,3 +1,9 @@ +BEGIN { + if ( $] < 5.009 ) { + print "1..0 # Skip: Perl <= 5.9 or later required\n"; + exit 0; + } +} use strict; use warnings; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-3.17/t/xml.t new/Encode-3.18/t/xml.t --- old/Encode-3.17/t/xml.t 2019-01-31 05:19:55.000000000 +0100 +++ new/Encode-3.18/t/xml.t 2022-05-25 09:33:08.000000000 +0200 @@ -1,3 +1,9 @@ +BEGIN { + if ( $] < 5.009 ) { + print "1..0 # Skip: Perl <= 5.9 or later required\n"; + exit 0; + } +} use strict; use warnings; @@ -8,7 +14,7 @@ my $text = Encode::encode('latin1', $content, Encode::FB_XMLCREF); is $text, "--テ--"; -done_testing; +done_testing(); package String; use overload
