Hello community, here is the log from the commit of package perl-Encode for openSUSE:Factory checked in at 2018-01-24 15:29:22 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Encode (Old) and /work/SRC/openSUSE:Factory/.perl-Encode.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Encode" Wed Jan 24 15:29:22 2018 rev:2 rq:568391 version:2.94 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Encode/perl-Encode.changes 2017-10-09 19:48:00.036165510 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Encode.new/perl-Encode.changes 2018-01-24 15:29:28.897232259 +0100 @@ -1,0 +2,6 @@ +Wed Jan 10 06:22:38 UTC 2018 - co...@suse.com + +- updated to 2.94 + see /usr/share/doc/packages/perl-Encode/Changes + +------------------------------------------------------------------- Old: ---- Encode-2.93.tar.gz New: ---- Encode-2.94.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Encode.spec ++++++ --- /var/tmp/diff_new_pack.KD2L35/_old 2018-01-24 15:29:29.417207940 +0100 +++ /var/tmp/diff_new_pack.KD2L35/_new 2018-01-24 15:29:29.421207752 +0100 @@ -1,7 +1,7 @@ # # spec file for package perl-Encode # -# Copyright (c) 2017 SUSE LINUX GmbH, Nuernberg, Germany. +# Copyright (c) 2018 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 @@ -17,7 +17,7 @@ Name: perl-Encode -Version: 2.93 +Version: 2.94 Release: 0 %define cpan_name Encode Summary: Character Encodings in Perl ++++++ Encode-2.93.tar.gz -> Encode-2.94.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-2.93/Changes new/Encode-2.94/Changes --- old/Encode-2.93/Changes 2017-10-07 00:21:58.000000000 +0200 +++ new/Encode-2.94/Changes 2018-01-09 06:53:04.000000000 +0100 @@ -1,8 +1,20 @@ # Revision history for Perl extension Encode. # -# $Id: Changes,v 2.93 2017/10/06 22:21:53 dankogai Exp dankogai $ +# $Id: Changes,v 2.94 2018/01/09 05:53:00 dankogai Exp dankogai $ # -$Revision: 2.93 $ $Date: 2017/10/06 22:21:53 $ +$Revision: 2.94 $ $Date: 2018/01/09 05:53:00 $ +! lib/Encode/Alias.pm + Fixed: deep recursion in Encode::find_encoding when decoding + bad MIME header + https://github.com/dankogai/p5-encode/pull/127 +! Encode.pm + Pulled: Include more information about Encode::is_utf8() that it + should not be normally used + https://github.com/dankogai/p5-encode/pull/126 + Pulled: Remove misleading documentation about UTF8 flag + https://github.com/dankogai/p5-encode/pull/125 + +2.93 2017/10/06 22:21:53 ! lib/Encode/MIME/Name.pm t/mime-name.t Pulled: Add "euc-cn" => "EUC-CN" alias to Encode::MIME::Name https://github.com/dankogai/p5-encode/pull/124 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-2.93/Encode.pm new/Encode-2.94/Encode.pm --- old/Encode-2.93/Encode.pm 2017-10-07 00:21:58.000000000 +0200 +++ new/Encode-2.94/Encode.pm 2018-01-09 06:53:09.000000000 +0100 @@ -1,5 +1,5 @@ # -# $Id: Encode.pm,v 2.93 2017/10/06 22:21:33 dankogai Exp $ +# $Id: Encode.pm,v 2.94 2018/01/09 05:53:00 dankogai Exp dankogai $ # package Encode; use strict; @@ -7,7 +7,7 @@ use constant DEBUG => !!$ENV{PERL_ENCODE_DEBUG}; our $VERSION; BEGIN { - $VERSION = sprintf "%d.%02d", q$Revision: 2.93 $ =~ /(\d+)/g; + $VERSION = sprintf "%d.%02d", q$Revision: 2.94 $ =~ /(\d+)/g; require XSLoader; XSLoader::load( __PACKAGE__, $VERSION ); } @@ -949,38 +949,11 @@ byte-oriented mode for when the internal UTF8 flag is off, and the other a character-oriented mode for when the internal UTF8 flag is on. -Here is how C<Encode> handles the UTF8 flag. - -=over 2 - -=item * - -When you I<encode>, the resulting UTF8 flag is always B<off>. - -=item * - -When you I<decode>, the resulting UTF8 flag is B<on>--I<unless> you can -unambiguously represent data. Here is what we mean by "unambiguously". -After C<$str = decode("foo", $octet)>, - - When $octet is... The UTF8 flag in $str is - --------------------------------------------- - In ASCII only (or EBCDIC only) OFF - In ISO-8859-1 ON - In any other Encoding ON - --------------------------------------------- - -As you see, there is one exception: in ASCII. That way you can assume -Goal #1. And with C<Encode>, Goal #2 is assumed but you still have to be -careful in the cases mentioned in the B<CAVEAT> paragraphs above. - This UTF8 flag is not visible in Perl scripts, exactly for the same reason you cannot (or rather, you I<don't have to>) see whether a scalar contains a string, an integer, or a floating-point number. But you can still peek and poke these if you will. See the next section. -=back - =head2 Messing with Perl's Internals The following API uses parts of Perl's internals in the current @@ -995,6 +968,13 @@ If I<CHECK> is true, also checks whether I<STRING> contains well-formed UTF-8. Returns true if successful, false otherwise. +Typically only necessary for debugging and testing. Don't use this flag as +a marker to distinguish character and binary data, that should be decided +for each variable when you write your code. + +B<CAVEAT>: If I<STRING> has UTF8 flag set, it does B<NOT> mean that +I<STRING> is UTF-8 encoded and vice-versa. + As of Perl 5.8.1, L<utf8> also has the C<utf8::is_utf8> function. =head3 _utf8_on diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-2.93/META.json new/Encode-2.94/META.json --- old/Encode-2.93/META.json 2017-10-07 00:22:49.000000000 +0200 +++ new/Encode-2.94/META.json 2018-01-09 06:53:49.000000000 +0100 @@ -49,7 +49,7 @@ "url" : "https://github.com/dankogai/p5-encode" } }, - "version" : "2.93", + "version" : "2.94", "x_contributors" : [ "Alex Davies <alex.dav...@talktalk.net>", "Alex Kapranoff <a...@kapranoff.ru>", diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-2.93/META.yml new/Encode-2.94/META.yml --- old/Encode-2.93/META.yml 2017-10-07 00:22:48.000000000 +0200 +++ new/Encode-2.94/META.yml 2018-01-09 06:53:49.000000000 +0100 @@ -24,7 +24,7 @@ parent: '0.221' resources: repository: https://github.com/dankogai/p5-encode -version: '2.93' +version: '2.94' x_contributors: - 'Alex Davies <alex.dav...@talktalk.net>' - 'Alex Kapranoff <a...@kapranoff.ru>' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-2.93/Makefile.PL new/Encode-2.94/Makefile.PL --- old/Encode-2.93/Makefile.PL 2017-10-07 00:22:05.000000000 +0200 +++ new/Encode-2.94/Makefile.PL 2018-01-09 06:53:09.000000000 +0100 @@ -1,5 +1,5 @@ # -# $Id: Makefile.PL,v 2.22 2017/10/06 22:21:53 dankogai Exp dankogai $ +# $Id: Makefile.PL,v 2.22 2017/10/06 22:21:53 dankogai Exp $ # use 5.007003; use strict; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-2.93/encoding.pm new/Encode-2.94/encoding.pm --- old/Encode-2.93/encoding.pm 2017-10-07 00:22:06.000000000 +0200 +++ new/Encode-2.94/encoding.pm 2018-01-09 06:53:09.000000000 +0100 @@ -1,4 +1,4 @@ -# $Id: encoding.pm,v 2.21 2017/10/06 22:21:53 dankogai Exp dankogai $ +# $Id: encoding.pm,v 2.21 2017/10/06 22:21:53 dankogai Exp $ package encoding; our $VERSION = sprintf "%d.%02d", q$Revision: 2.21 $ =~ /(\d+)/g; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-2.93/lib/Encode/Alias.pm new/Encode-2.94/lib/Encode/Alias.pm --- old/Encode-2.93/lib/Encode/Alias.pm 2017-10-07 00:22:06.000000000 +0200 +++ new/Encode-2.94/lib/Encode/Alias.pm 2018-01-09 06:53:11.000000000 +0100 @@ -1,7 +1,7 @@ package Encode::Alias; use strict; use warnings; -our $VERSION = do { my @r = ( q$Revision: 2.23 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r }; +our $VERSION = do { my @r = ( q$Revision: 2.24 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r }; use constant DEBUG => !!$ENV{PERL_ENCODE_DEBUG}; use Exporter 'import'; @@ -270,7 +270,7 @@ define_alias( qr/\bUTF-8$/i => '"utf-8-strict"' ); # At last, Map white space and _ to '-' - define_alias( qr/^(\S+)[\s_]+(.*)$/i => '"$1-$2"' ); + define_alias( qr/^([^\s_]+)[\s_]+([^\s_]*)$/i => '"$1-$2"' ); } 1; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-2.93/t/decode.t new/Encode-2.94/t/decode.t --- old/Encode-2.93/t/decode.t 2017-10-07 00:22:12.000000000 +0200 +++ new/Encode-2.94/t/decode.t 2018-01-09 06:53:11.000000000 +0100 @@ -1,5 +1,5 @@ # -# $Id: decode.t,v 1.4 2017/10/06 22:21:53 dankogai Exp dankogai $ +# $Id: decode.t,v 1.4 2017/10/06 22:21:53 dankogai Exp $ # use strict; use Encode qw(decode_utf8 FB_CROAK find_encoding decode); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Encode-2.93/t/mime-name.t new/Encode-2.94/t/mime-name.t --- old/Encode-2.93/t/mime-name.t 2017-10-07 00:22:13.000000000 +0200 +++ new/Encode-2.94/t/mime-name.t 2018-01-09 06:53:11.000000000 +0100 @@ -1,5 +1,5 @@ # -# $Id: mime-name.t,v 1.3 2017/10/06 22:21:53 dankogai Exp dankogai $ +# $Id: mime-name.t,v 1.3 2017/10/06 22:21:53 dankogai Exp $ # This script is written in utf8 # BEGIN {