Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-Test-File-Contents for
openSUSE:Factory checked in at 2022-08-16 17:08:38
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Test-File-Contents (Old)
and /work/SRC/openSUSE:Factory/.perl-Test-File-Contents.new.1521 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Test-File-Contents"
Tue Aug 16 17:08:38 2022 rev:3 rq:997359 version:0.241
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-Test-File-Contents/perl-Test-File-Contents.changes
2022-08-01 21:32:30.042018251 +0200
+++
/work/SRC/openSUSE:Factory/.perl-Test-File-Contents.new.1521/perl-Test-File-Contents.changes
2022-08-16 17:08:45.404059861 +0200
@@ -1,0 +2,6 @@
+Thu Aug 11 03:11:53 UTC 2022 - Tina M??ller <[email protected]>
+
+- updated to 0.241
+ see /usr/share/doc/packages/perl-Test-File-Contents/Changes
+
+-------------------------------------------------------------------
Old:
----
Test-File-Contents-0.240.tar.gz
New:
----
Test-File-Contents-0.241.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Test-File-Contents.spec ++++++
--- /var/tmp/diff_new_pack.9GjD8L/_old 2022-08-16 17:08:45.924061416 +0200
+++ /var/tmp/diff_new_pack.9GjD8L/_new 2022-08-16 17:08:45.932061441 +0200
@@ -18,7 +18,7 @@
%define cpan_name Test-File-Contents
Name: perl-Test-File-Contents
-Version: 0.240
+Version: 0.241
Release: 0
License: Artistic-1.0 OR GPL-1.0-or-later
Summary: Test routines for examining the contents of files
++++++ Test-File-Contents-0.240.tar.gz -> Test-File-Contents-0.241.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-File-Contents-0.240/Changes
new/Test-File-Contents-0.241/Changes
--- old/Test-File-Contents-0.240/Changes 2022-07-17 04:52:40.000000000
+0200
+++ new/Test-File-Contents-0.241/Changes 2022-08-10 04:02:31.000000000
+0200
@@ -1,26 +1,31 @@
Release history for Test-File-Contents
-0.240 2022-07-17
+0.241 Wed 10 Aug 2022
+ - No more subclassing of Exporter
+ - Packaging fix to stop installing boilerplate.pl
+ - Updated package metadata
+
+0.240 Sun 17 Jul 2022
- Packaging improvements. No functional changes.
-0.23 2016-03-16
+0.23 Wed 16 Mar 2016
- Fix encoding errors when reading in a file on Windows with `utf8`
enabled. See https://rt.perl.org/Ticket/Display.html?id=127668 for the
bug we've worked around.
-0.22 2016-03-02
+0.22 Wed 02 Mar 2016
- Adjusted tests to account for change in output of Text::Diff 1.44.
They still pass with earlier versions of Text::Diff.
- Removed Pod tests from the distribution.
-0.21 2013-04-12
+0.21 Fri 12 Apr 2013
- Require Test::Pod 1.41 for Pod tests. Fixes test failures due to the
use of the `L<text|scheme>` Pod syntax disallowed in earlier versions
of Test::Pod.
- Eliminated "v-string in use/require non-portable" warning on Perl
5.10.0.
-0.20 2011-02-18
+0.20 Fri 18 Feb 2011
- Now require Perl 5.8.3 or higher. 5.8 has effectively been the
required Perl all along thanks to the dependency on Digest::MD5.
- Added encoding option, to make sure that files are read in their
@@ -34,7 +39,7 @@
as an alias for backwards compatibility.
- Added `file_contents_eq_or_diff()` and `files_eq_or_diff()`.
-0.10 2011-02-18
+0.10 Fri 18 Feb 2011
- Maintainership taken by David E. Wheeler.
- Removed `examples/simple.pl`, since it wouldn't run anyway.
- Added prototypes to the test functions.
@@ -47,20 +52,20 @@
being tested.
- Wordsmithed some of the diagnostic messages.
-0.05 2007-03-20
+0.05 Tue 20 Mar 2007
- Packaging fixes. No functional changes.
-0.04 2005-10-26
+0.04 Wed 26 Oct 2005
- Small tweaks to the packaging, mostly for CPANTS. No functional
changes.
-0.03 2006-01-20
+0.03 Fri 20 Jan 2006
- Added file_contents_isnt and file_contents_unlike and made file
access OS-neutral (contributed by David Wheeler).
-0.02 2004-08-25
+0.02 Wed 25 Aug 2004
- Minor packaging fixes.
-0.01 2004-08-25
+0.01 Wed 25 Aug 2004
- First version, released on an unsuspecting world.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-File-Contents-0.240/LICENSE
new/Test-File-Contents-0.241/LICENSE
--- old/Test-File-Contents-0.240/LICENSE 2022-07-17 04:58:28.000000000
+0200
+++ new/Test-File-Contents-0.241/LICENSE 2022-08-10 04:04:11.000000000
+0200
@@ -376,4 +376,3 @@
MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
The End
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-File-Contents-0.240/MANIFEST
new/Test-File-Contents-0.241/MANIFEST
--- old/Test-File-Contents-0.240/MANIFEST 2022-07-17 04:58:28.000000000
+0200
+++ new/Test-File-Contents-0.241/MANIFEST 2022-08-10 04:04:11.000000000
+0200
@@ -1,11 +1,6 @@
Changes
-LICENSE
-MANIFEST
-META.json Module JSON meta-data (added by
MakeMaker)
-META.yml Module YAML meta-data (added by
MakeMaker)
Makefile.PL
-README
-boilerplate.pl
+inc/boilerplate.pl
lib/Test/File/Contents.pm
t/10.basic.t
t/data/aaa.txt
@@ -13,3 +8,8 @@
t/data/bbb.txt
t/data/utf8-2.txt
t/data/utf8.txt
+MANIFEST
+META.yml Module YAML meta-data (added by
MakeMaker)
+META.json Module JSON meta-data (added by
MakeMaker)
+LICENSE
+README
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-File-Contents-0.240/META.json
new/Test-File-Contents-0.241/META.json
--- old/Test-File-Contents-0.240/META.json 2022-07-17 04:58:27.000000000
+0200
+++ new/Test-File-Contents-0.241/META.json 2022-08-10 04:04:11.000000000
+0200
@@ -52,7 +52,7 @@
"web" : "https://github.com/ap/Test-File-Contents"
}
},
- "version" : "0.240",
+ "version" : "0.241",
"x_copyright" : {
"holder" : "David E. Wheeler",
"year" : 2016
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-File-Contents-0.240/META.yml
new/Test-File-Contents-0.241/META.yml
--- old/Test-File-Contents-0.240/META.yml 2022-07-17 04:58:27.000000000
+0200
+++ new/Test-File-Contents-0.241/META.yml 2022-08-10 04:04:11.000000000
+0200
@@ -26,7 +26,7 @@
bugtracker:
https://rt.cpan.org/Public/Dist/Display.html?Name=Test-File-Contents
license: http://dev.perl.org/licenses/
repository: https://github.com/ap/Test-File-Contents.git
-version: '0.240'
+version: '0.241'
x_copyright:
holder: 'David E. Wheeler'
year: 2016
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-File-Contents-0.240/Makefile.PL
new/Test-File-Contents-0.241/Makefile.PL
--- old/Test-File-Contents-0.240/Makefile.PL 2022-07-17 04:52:40.000000000
+0200
+++ new/Test-File-Contents-0.241/Makefile.PL 2022-08-10 03:57:48.000000000
+0200
@@ -4,42 +4,43 @@
my $bt =
q<https://rt.cpan.org/Public/Dist/Display.html?Name=Test-File-Contents>;
my %META = (
- name => 'Test-File-Contents',
- author => [ 'Kirrily Robert', 'David E. Wheeler' ],
- x_copyright => { holder => 'David E. Wheeler', year => 2016 },
- license => 'perl_5',
- prereqs => {
- test => {
- requires => {
- 'Test::More' => '0.70',
- },
- },
- runtime => {
- requires => {
- perl => '5.008003',
- 'Test::Builder' => '0.70',
- 'Digest::MD5' => 0,
- 'File::Spec' => 0,
- 'Text::Diff' => '0.35',
- },
- },
- },
- dynamic_config => 0,
- resources => {
+ name => 'Test-File-Contents',
+ author => [ 'Kirrily Robert', 'David E. Wheeler' ],
+ x_copyright => { holder => 'David E. Wheeler', year => 2016 },
+ license => 'perl_5',
+ resources => {
+ license => [ 'http://dev.perl.org/licenses/' ],
repository => { type => 'git', url => "$sc.git", web => $sc },
bugtracker => { web => $bt },
- license => [ 'http://dev.perl.org/licenses/' ],
+ },
+ dynamic_config => 0,
+ prereqs => {
+ runtime => {
+ requires => {qw(
+ perl 5.008003
+ Test::Builder 0.70
+ Digest::MD5 0
+ File::Spec 0
+ Text::Diff 0.35
+ )},
+ },
+ test => {
+ requires => {qw(
+ Test::More 0.70
+ )},
+ },
},
);
sub MY::postamble { -f 'META.yml' ? return : <<'' }
create_distdir : MANIFEST
+distdir : MANIFEST
MANIFEST :
- ( git ls-files ':!README.pod' ; echo MANIFEST ) | sort -f > MANIFEST
+ ( git ls-files ':!README.pod' ; echo MANIFEST ) > MANIFEST
distdir : boilerplate
.PHONY : boilerplate
boilerplate : distmeta
- $(PERL) -Ilib boilerplate.pl $(DISTVNAME)
+ $(PERL) -Ilib inc/boilerplate.pl $(DISTVNAME)
## BOILERPLATE ###############################################################
require ExtUtils::MakeMaker;
@@ -51,9 +52,11 @@
my $mymeta = $eumm_version >= 6.57_02;
my $mymeta_broken = $mymeta && $eumm_version < 6.57_07;
+(my $basepath = (-d 'lib' && 'lib/') . $META{name}) =~ s{-}{/}g;
+
($MM_ARGS{NAME} = $META{name}) =~ s/-/::/g;
-($MM_ARGS{VERSION_FROM} = "lib/$MM_ARGS{NAME}.pm") =~ s{::}{/}g;
-$MM_ARGS{ABSTRACT_FROM} = $MM_ARGS{VERSION_FROM};
+$MM_ARGS{VERSION_FROM} = "$basepath.pm";
+$MM_ARGS{ABSTRACT_FROM} = -f "$basepath.pod" ? "$basepath.pod" :
"$basepath.pm";
$META{license} = [ $META{license} ]
if $META{license} && !ref $META{license};
$MM_ARGS{LICENSE} = $META{license}[0]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-File-Contents-0.240/README
new/Test-File-Contents-0.241/README
--- old/Test-File-Contents-0.240/README 2022-07-17 04:58:28.000000000 +0200
+++ new/Test-File-Contents-0.241/README 2022-08-10 04:04:11.000000000 +0200
@@ -7,15 +7,16 @@
INSTALLATION
-This is a Perl module distribution. It should be installed with whichever
-tool you use to manage your installation of Perl, e.g. any of
+This is a Perl module distribution. It should be installed with
+whichever tool you use to manage your installation of Perl, e.g. any of
cpanm .
cpan .
cpanp -i .
-Consult http://www.cpan.org/modules/INSTALL.html for further instruction.
-Should you wish to install this module manually, the procedure is
+Consult http://www.cpan.org/modules/INSTALL.html for further
+instruction. Should you wish to install this module manually, the
+procedure is
perl Makefile.PL
make
@@ -26,5 +27,5 @@
This software is copyright (c) 2016 by David E. Wheeler.
-This is free software; you can redistribute it and/or modify it under the
-same terms as the Perl 5 programming language system itself.
+This is free software; you can redistribute it and/or modify it under
+the same terms as the Perl 5 programming language system itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-File-Contents-0.240/boilerplate.pl
new/Test-File-Contents-0.241/boilerplate.pl
--- old/Test-File-Contents-0.240/boilerplate.pl 2022-07-17 04:48:31.000000000
+0200
+++ new/Test-File-Contents-0.241/boilerplate.pl 1970-01-01 01:00:00.000000000
+0100
@@ -1,44 +0,0 @@
-use strict; use warnings;
-
-use CPAN::Meta;
-use Software::LicenseUtils;
-use Pod::Readme::Brief 1.001;
-sub slurp { open my $fh, '<', $_[0] or die "Couldn't open $_[0] to read:
$!\n"; local $/; readline $fh }
-
-chdir $ARGV[0] or die "Cannot chdir to $ARGV[0]: $!\n";
-
-my %file;
-
-my $meta = CPAN::Meta->load_file( 'META.json' );
-
-my $license = do {
- my @key = ( $meta->license, $meta->meta_spec_version );
- my ( $class, @ambiguous ) =
Software::LicenseUtils->guess_license_from_meta_key( @key );
- die if @ambiguous or not $class;
- $class->new( $meta->custom( 'x_copyright' ) );
-};
-
-$file{'LICENSE'} = $license->fulltext;
-
-my ( $main_module ) = map { s!-!/!g; "lib/$_.pm" } $meta->name;
-
-for ( $file{ $main_module } = slurp $main_module ) {
- s{(?=^=cut\n\z)}{ join "\n\n", (
- '=head1 AUTHOR', $meta->authors,
- '=head1 COPYRIGHT AND LICENSE', $license->notice . "\n",
- ) }me;
- $file{'README'} = Pod::Readme::Brief->new( $_ )
- ->render( installer => -e 'Makefile.PL' ? 'eumm' : die );
-}
-
-for ( $file{'MANIFEST'} = slurp 'MANIFEST' ) {
- my %have = map +( $_, 1 ), /^([^\s#]+)/mg;
- $_ = join '', sort map "$_\n", ( split /\n/, $_ ), ( grep !$have{ $_ },
keys %file );
-}
-
-for my $fn ( sort keys %file ) {
- unlink $fn if -e $fn;
- open my $fh, '>', $fn or die "Couldn't open $fn to write: $!\n";
- print $fh $file{ $fn };
- close $fh or die "Couldn't close $fn after writing: $!\n";
-}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-File-Contents-0.240/inc/boilerplate.pl
new/Test-File-Contents-0.241/inc/boilerplate.pl
--- old/Test-File-Contents-0.240/inc/boilerplate.pl 1970-01-01
01:00:00.000000000 +0100
+++ new/Test-File-Contents-0.241/inc/boilerplate.pl 2022-08-10
03:57:48.000000000 +0200
@@ -0,0 +1,50 @@
+use strict; use warnings;
+
+use CPAN::Meta;
+use Software::LicenseUtils 0.103011;
+use Pod::Readme::Brief 1.001;
+
+sub slurp { open my $fh, '<', $_[0] or die "Couldn't open $_[0] to read:
$!\n"; local $/; readline $fh }
+sub trimnl { s/\A\s*\n//, s/\s*\z/\n/ for @_; wantarray ? @_ : $_[-1] }
+sub mkparentdirs {
+ my @dir = do { my %seen; sort grep s!/[^/]+\z!! && !$seen{ $_ }++, my
@copy = @_ };
+ if ( @dir ) { mkparentdirs( @dir ); mkdir for @dir }
+}
+
+chdir $ARGV[0] or die "Cannot chdir to $ARGV[0]: $!\n";
+
+my %file;
+
+my $meta = CPAN::Meta->load_file( 'META.json' );
+
+my $license = do {
+ my @key = ( $meta->license, $meta->meta_spec_version );
+ my ( $class, @ambiguous ) =
Software::LicenseUtils->guess_license_from_meta_key( @key );
+ die if @ambiguous or not $class;
+ $class->new( $meta->custom( 'x_copyright' ) );
+};
+
+$file{'LICENSE'} = trimnl $license->fulltext;
+
+my ( $main_module ) = map { s!-!/!g; s!^!lib/! if -d 'lib'; -f "$_.pod" ?
"$_.pod" : "$_.pm" } $meta->name;
+
+( $file{ $main_module } = slurp $main_module ) =~ s{(^=cut\s*\z)}{ join "\n", (
+ "=head1 AUTHOR\n", trimnl( $meta->authors ),
+ "=head1 COPYRIGHT AND LICENSE\n", trimnl( $license->notice ),
+ "=cut\n",
+) }me;
+
+die unless -e 'Makefile.PL';
+$file{'README'} = Pod::Readme::Brief->new( $file{ $main_module } )->render(
installer => 'eumm' );
+
+my @manifest = split /\n/, slurp 'MANIFEST';
+my %manifest = map /\A([^\s#]+)()/, @manifest;
+$file{'MANIFEST'} = join "\n", @manifest, ( sort grep !exists $manifest{ $_ },
keys %file ), '';
+
+mkparentdirs sort keys %file;
+for my $fn ( sort keys %file ) {
+ unlink $fn if -e $fn;
+ open my $fh, '>', $fn or die "Couldn't open $fn to write: $!\n";
+ print $fh $file{ $fn };
+ close $fh or die "Couldn't close $fn after writing: $!\n";
+}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-File-Contents-0.240/lib/Test/File/Contents.pm
new/Test-File-Contents-0.241/lib/Test/File/Contents.pm
--- old/Test-File-Contents-0.240/lib/Test/File/Contents.pm 2022-07-17
04:58:28.000000000 +0200
+++ new/Test-File-Contents-0.241/lib/Test/File/Contents.pm 2022-08-10
04:04:11.000000000 +0200
@@ -12,15 +12,15 @@
=cut
-our $VERSION = '0.240';
+our $VERSION = '0.241';
use Test::Builder;
use Digest::MD5;
use File::Spec;
use Text::Diff;
-require Exporter;
-our @ISA = qw(Exporter);
+BEGIN { require Exporter; *import = \&Exporter::import }
+
our @EXPORT = qw(
file_contents_eq
file_contents_eq_or_diff