Hello community, here is the log from the commit of package perl-File-Slurper for openSUSE:Factory checked in at 2018-01-24 15:30:25 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-File-Slurper (Old) and /work/SRC/openSUSE:Factory/.perl-File-Slurper.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-File-Slurper" Wed Jan 24 15:30:25 2018 rev:4 rq:568409 version:0.011 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-File-Slurper/perl-File-Slurper.changes 2017-09-20 17:14:00.570418579 +0200 +++ /work/SRC/openSUSE:Factory/.perl-File-Slurper.new/perl-File-Slurper.changes 2018-01-24 15:30:29.718387659 +0100 @@ -1,0 +2,10 @@ +Tue Dec 19 06:22:05 UTC 2017 - [email protected] + +- updated to 0.011 + see /usr/share/doc/packages/perl-File-Slurper/Changes + + 0.011 2017-12-18 21:23:24+01:00 Europe/Amsterdam + Correctly set value of $PerlIO::encoding::fallback + Don't skip latin-1 checking + +------------------------------------------------------------------- Old: ---- File-Slurper-0.010.tar.gz New: ---- File-Slurper-0.011.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-File-Slurper.spec ++++++ --- /var/tmp/diff_new_pack.tkJSu4/_old 2018-01-24 15:30:30.282361283 +0100 +++ /var/tmp/diff_new_pack.tkJSu4/_new 2018-01-24 15:30:30.282361283 +0100 @@ -17,7 +17,7 @@ Name: perl-File-Slurper -Version: 0.010 +Version: 0.011 Release: 0 %define cpan_name File-Slurper Summary: Simple, Sane and Efficient Module to Slurp a File ++++++ File-Slurper-0.010.tar.gz -> File-Slurper-0.011.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Slurper-0.010/Changes new/File-Slurper-0.011/Changes --- old/File-Slurper-0.010/Changes 2017-09-17 22:09:07.000000000 +0200 +++ new/File-Slurper-0.011/Changes 2017-12-18 21:23:26.000000000 +0100 @@ -1,5 +1,9 @@ Revision history for File-Slurper +0.011 2017-12-18 21:23:24+01:00 Europe/Amsterdam + Correctly set value of $PerlIO::encoding::fallback + Don't skip latin-1 checking + 0.010 2017-09-17 22:09:05+02:00 Europe/Amsterdam Recognize "latin-1" as iso-8859-1 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Slurper-0.010/MANIFEST new/File-Slurper-0.011/MANIFEST --- old/File-Slurper-0.010/MANIFEST 2017-09-17 22:09:07.000000000 +0200 +++ new/File-Slurper-0.011/MANIFEST 2017-12-18 21:23:26.000000000 +0100 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.007. +# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.010. Changes INSTALL LICENSE @@ -15,6 +15,4 @@ t/10-basics.t t/20-no-side-effects.t t/data/cp1252.txt -xt/author/00-compile.t -xt/author/pod-coverage.t xt/author/pod-syntax.t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Slurper-0.010/META.json new/File-Slurper-0.011/META.json --- old/File-Slurper-0.010/META.json 2017-09-17 22:09:07.000000000 +0200 +++ new/File-Slurper-0.011/META.json 2017-12-18 21:23:26.000000000 +0100 @@ -4,7 +4,7 @@ "Leon Timmermans <[email protected]>" ], "dynamic_config" : 0, - "generated_by" : "Dist::Zilla version 6.007, CPAN::Meta::Converter version 2.150005", + "generated_by" : "Dist::Zilla version 6.010, CPAN::Meta::Converter version 2.150005", "license" : [ "perl_5" ], @@ -25,15 +25,8 @@ }, "develop" : { "requires" : { - "File::Spec" : "0", - "IO::Handle" : "0", - "IPC::Open3" : "0", - "Pod::Coverage::TrustPod" : "0", "Test::More" : "0", - "Test::Pod" : "1.41", - "Test::Pod::Coverage" : "1.08", - "blib" : "1.01", - "perl" : "5.006" + "Test::Pod" : "1.41" } }, "runtime" : { @@ -65,7 +58,7 @@ "provides" : { "File::Slurper" : { "file" : "lib/File/Slurper.pm", - "version" : "0.010" + "version" : "0.011" } }, "release_status" : "stable", @@ -80,7 +73,7 @@ "web" : "https://github.com/Leont/file-slurp-sane"; } }, - "version" : "0.010", + "version" : "0.011", "x_contributors" : [ "Jim Davis <[email protected]>", "Leon Timmermans <[email protected]>", diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Slurper-0.010/META.yml new/File-Slurper-0.011/META.yml --- old/File-Slurper-0.010/META.yml 2017-09-17 22:09:07.000000000 +0200 +++ new/File-Slurper-0.011/META.yml 2017-12-18 21:23:26.000000000 +0100 @@ -13,7 +13,7 @@ ExtUtils::MakeMaker: '0' perl: '5.008' dynamic_config: 0 -generated_by: 'Dist::Zilla version 6.007, CPAN::Meta::Converter version 2.150005' +generated_by: 'Dist::Zilla version 6.010, CPAN::Meta::Converter version 2.150005' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -22,7 +22,7 @@ provides: File::Slurper: file: lib/File/Slurper.pm - version: '0.010' + version: '0.011' recommends: PerlIO::utf8_strict: '0' requires: @@ -37,7 +37,7 @@ resources: bugtracker: http://rt.cpan.org/Public/Dist/Display.html?Name=File-Slurper repository: git://github.com/Leont/file-slurp-sane.git -version: '0.010' +version: '0.011' x_contributors: - 'Jim Davis <[email protected]>' - 'Leon Timmermans <[email protected]>' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Slurper-0.010/Makefile.PL new/File-Slurper-0.011/Makefile.PL --- old/File-Slurper-0.010/Makefile.PL 2017-09-17 22:09:07.000000000 +0200 +++ new/File-Slurper-0.011/Makefile.PL 2017-12-18 21:23:26.000000000 +0100 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.007. +# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.010. use strict; use warnings; @@ -32,7 +32,7 @@ "Test::More" => 0, "Test::Warnings" => 0 }, - "VERSION" => "0.010", + "VERSION" => "0.011", "test" => { "TESTS" => "t/*.t" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Slurper-0.010/README new/File-Slurper-0.011/README --- old/File-Slurper-0.010/README 2017-09-17 22:09:07.000000000 +0200 +++ new/File-Slurper-0.011/README 2017-12-18 21:23:26.000000000 +0100 @@ -1,7 +1,7 @@ This archive contains the distribution File-Slurper, -version 0.010: +version 0.011: A simple, sane and efficient module to slurp a file @@ -11,5 +11,5 @@ the same terms as the Perl 5 programming language system itself. -This README file was generated by Dist::Zilla::Plugin::Readme v6.007. +This README file was generated by Dist::Zilla::Plugin::Readme v6.010. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Slurper-0.010/dist.ini new/File-Slurper-0.011/dist.ini --- old/File-Slurper-0.010/dist.ini 2017-09-17 22:09:07.000000000 +0200 +++ new/File-Slurper-0.011/dist.ini 2017-12-18 21:23:26.000000000 +0100 @@ -4,8 +4,37 @@ copyright_holder = Leon Timmermans copyright_year = 2014 -[@LEONT] -install_tool = eumm +[Git::GatherDir] +[PruneCruft] +[MetaYAML] +[MetaJSON] +[Readme] +[Manifest] +[License] + +[AutoPrereqs] +[Repository] +[Bugtracker] +[MetaProvides::Package] +[NextRelease] + +[Git::Contributors] +[MinimumPerl] +[MakeMaker] + +[Git::NextVersion] +[@Git] + +[CheckChangesHasContent] +[RunExtraTests] +[TestRelease] +[ConfirmRelease] +[UploadToCPAN] +[PodWeaver] +[PkgVersion] +[PodSyntaxTests] +[InstallGuide] + [RemovePrereqs] remove = PerlIO::utf8_strict [Prereqs / RuntimeRecommends] diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Slurper-0.010/lib/File/Slurper.pm new/File-Slurper-0.011/lib/File/Slurper.pm --- old/File-Slurper-0.010/lib/File/Slurper.pm 2017-09-17 22:09:07.000000000 +0200 +++ new/File-Slurper-0.011/lib/File/Slurper.pm 2017-12-18 21:23:26.000000000 +0100 @@ -1,12 +1,12 @@ package File::Slurper; -$File::Slurper::VERSION = '0.010'; +$File::Slurper::VERSION = '0.011'; use strict; use warnings; use Carp 'croak'; use Exporter 5.57 'import'; -use Encode qw(:fallbacks); +use Encode qw/FB_CROAK STOP_AT_PARTIAL/; use PerlIO::encoding; our @EXPORT_OK = qw/read_binary read_text read_lines write_binary write_text read_dir/; @@ -40,10 +40,7 @@ my ($encoding, $crlf) = @_; $crlf = CRLF_DEFAULT if $crlf && $crlf eq 'auto'; - if ($encoding =~ /^(latin-?|iso-8859-)1$/i) { - return $crlf ? ':unix:crlf' : ':raw'; - } - elsif (HAS_UTF8_STRICT && $encoding =~ /^utf-?8\b/i) { + if (HAS_UTF8_STRICT && $encoding =~ /^utf-?8\b/i) { return $crlf ? ':unix:utf8_strict:crlf' : ':unix:utf8_strict'; } else { @@ -56,9 +53,8 @@ my ($filename, $encoding, $crlf) = @_; $encoding ||= 'utf-8'; my $layer = _text_layers($encoding, $crlf); - return read_binary($filename) if $layer eq ':raw'; - local $PerlIO::encoding::fallback = FB_CROAK; + local $PerlIO::encoding::fallback = STOP_AT_PARTIAL | FB_CROAK; open my $fh, "<$layer", $filename or croak "Couldn't open $filename: $!"; return do { local $/; <$fh> }; } @@ -68,7 +64,7 @@ $encoding ||= 'utf-8'; my $layer = _text_layers($encoding, $crlf); - local $PerlIO::encoding::fallback = FB_CROAK; + local $PerlIO::encoding::fallback = STOP_AT_PARTIAL | FB_CROAK; open my $fh, ">$layer", $filename or croak "Couldn't open $filename: $!"; print $fh $_[1] or croak "Couldn't write to $filename: $!"; close $fh or croak "Couldn't write to $filename: $!"; @@ -76,7 +72,11 @@ } sub write_binary { - return write_text(@_[0,1], 'latin-1'); + my $filename = $_[0]; + open my $fh, ">:raw", $filename or croak "Couldn't open $filename: $!"; + print $fh $_[1] or croak "Couldn't write to $filename: $!"; + close $fh or croak "Couldn't write to $filename: $!"; + return; } sub read_lines { @@ -84,7 +84,7 @@ $encoding ||= 'utf-8'; my $layer = _text_layers($encoding, $crlf); - local $PerlIO::encoding::fallback = FB_CROAK; + local $PerlIO::encoding::fallback = STOP_AT_PARTIAL | FB_CROAK; open my $fh, "<$layer", $filename or croak "Couldn't open $filename: $!"; return <$fh> if $skip_chomp; my @buf = <$fh>; @@ -115,7 +115,7 @@ =head1 VERSION -version 0.010 +version 0.011 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Slurper-0.010/xt/author/00-compile.t new/File-Slurper-0.011/xt/author/00-compile.t --- old/File-Slurper-0.010/xt/author/00-compile.t 2017-09-17 22:09:07.000000000 +0200 +++ new/File-Slurper-0.011/xt/author/00-compile.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,54 +0,0 @@ -use 5.006; -use strict; -use warnings; - -# this test was generated with Dist::Zilla::Plugin::Test::Compile 2.054 - -use Test::More; - -plan tests => 2; - -my @module_files = ( - 'File/Slurper.pm' -); - - - -# no fake home requested - -my $inc_switch = -d 'blib' ? '-Mblib' : '-Ilib'; - -use File::Spec; -use IPC::Open3; -use IO::Handle; - -open my $stdin, '<', File::Spec->devnull or die "can't open devnull: $!"; - -my @warnings; -for my $lib (@module_files) -{ - # see L<perlfaq8/How can I capture STDERR from an external command?> - my $stderr = IO::Handle->new; - - my $pid = open3($stdin, '>&STDERR', $stderr, $^X, $inc_switch, '-e', "require q[$lib]"); - binmode $stderr, ':crlf' if $^O eq 'MSWin32'; - my @_warnings = <$stderr>; - waitpid($pid, 0); - is($?, 0, "$lib loaded ok"); - - shift @_warnings if @_warnings and $_warnings[0] =~ /^Using .*\bblib/ - and not eval { require blib; blib->VERSION('1.01') }; - - if (@_warnings) - { - warn @_warnings; - push @warnings, @_warnings; - } -} - - - -is(scalar(@warnings), 0, 'no warnings found') - or diag 'got warnings: ', ( Test::More->can('explain') ? Test::More::explain(\@warnings) : join("\n", '', @warnings) ); - - diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Slurper-0.010/xt/author/pod-coverage.t new/File-Slurper-0.011/xt/author/pod-coverage.t --- old/File-Slurper-0.010/xt/author/pod-coverage.t 2017-09-17 22:09:07.000000000 +0200 +++ new/File-Slurper-0.011/xt/author/pod-coverage.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,7 +0,0 @@ -#!perl -# This file was automatically generated by Dist::Zilla::Plugin::PodCoverageTests. - -use Test::Pod::Coverage 1.08; -use Pod::Coverage::TrustPod; - -all_pod_coverage_ok({ coverage_class => 'Pod::Coverage::TrustPod' });
