Hello community, here is the log from the commit of package perl-File-Find-Rule for openSUSE:Factory checked in at 2015-12-13 09:38:47 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-File-Find-Rule (Old) and /work/SRC/openSUSE:Factory/.perl-File-Find-Rule.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-File-Find-Rule" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-File-Find-Rule/perl-File-Find-Rule.changes 2011-09-23 12:37:03.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-File-Find-Rule.new/perl-File-Find-Rule.changes 2015-12-13 09:38:48.000000000 +0100 @@ -1,0 +2,10 @@ +Sat Dec 5 10:06:05 UTC 2015 - co...@suse.com + +- updated to 0.34 + see /usr/share/doc/packages/perl-File-Find-Rule/Changes + + 0.34 Thursday 4th December, 2015 + Add canonpath option to normalize file-path + separators. Work by Mithun Ayachit. + +------------------------------------------------------------------- Old: ---- File-Find-Rule-0.33.tar.gz New: ---- File-Find-Rule-0.34.tar.gz cpanspec.yml ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-File-Find-Rule.spec ++++++ --- /var/tmp/diff_new_pack.XupE73/_old 2015-12-13 09:38:49.000000000 +0100 +++ /var/tmp/diff_new_pack.XupE73/_new 2015-12-13 09:38:49.000000000 +0100 @@ -1,7 +1,7 @@ # # spec file for package perl-File-Find-Rule # -# Copyright (c) 2011 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2015 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 @@ -16,52 +16,47 @@ # +Name: perl-File-Find-Rule +Version: 0.34 +Release: 0 %define cpan_name File-Find-Rule - -Name: perl-%cpan_name -Version: 0.33 -Release: 3 -License: GPL-1.0+ or Artistic-1.0 Summary: Alternative interface to File::Find -Url: http://search.cpan.org/dist/File-Find-Rule/ +License: GPL-1.0+ or Artistic-1.0 Group: Development/Libraries/Perl -Source: %cpan_name-%{version}.tar.gz -BuildRequires: perl-Number-Compare -BuildRequires: perl-Text-Glob -BuildRequires: perl-macros -Requires: perl-Number-Compare -Requires: perl-Text-Glob -Provides: %cpan_name +Url: http://search.cpan.org/dist/File-Find-Rule/ +Source0: http://www.cpan.org/authors/id/R/RC/RCLAMP/%{cpan_name}-%{version}.tar.gz +Source1: cpanspec.yml +BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build +BuildRequires: perl +BuildRequires: perl-macros +BuildRequires: perl(Number::Compare) +BuildRequires: perl(Text::Glob) >= 0.07 +Requires: perl(Number::Compare) +Requires: perl(Text::Glob) >= 0.07 %{perl_requires} %description -File::Find::Rule is a friendlier interface to File::Find. It allows you to build rules which specify the desired files and directories. +File::Find::Rule is a friendlier interface to File::Find. It allows you to +build rules which specify the desired files and directories. %prep -%setup -q -n %cpan_name-%{version} +%setup -q -n %{cpan_name}-%{version} %build -perl Makefile.PL OPTIMIZE="%{optflags} -Wall" -make +%{__perl} Makefile.PL INSTALLDIRS=vendor +%{__make} %{?_smp_mflags} %check -make test +%{__make} test %install -make DESTDIR=%{buildroot} install_vendor +%perl_make_install %perl_process_packlist +%perl_gen_filelist -%clean -# clean up the hard disc after build -rm -rf %{buildroot} - -%files -%defattr(-,root,root) -%{_bindir}/findrule* -%doc %{_mandir}/man?/* -%{perl_vendorlib}/File -%{perl_vendorarch}/auto/File -%doc Changes MANIFEST +%files -f %{name}.files +%defattr(-,root,root,755) +%doc Changes findrule %changelog ++++++ File-Find-Rule-0.33.tar.gz -> File-Find-Rule-0.34.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Find-Rule-0.33/Changes new/File-Find-Rule-0.34/Changes --- old/File-Find-Rule-0.33/Changes 2011-09-19 13:54:13.000000000 +0200 +++ new/File-Find-Rule-0.34/Changes 2015-12-03 15:28:02.000000000 +0100 @@ -1,3 +1,7 @@ +0.34 Thursday 4th December, 2015 + Add canonpath option to normalize file-path + separators. Work by Mithun Ayachit. + 0.33 Monday 19th September, 2011 Fixes the case where name("foo(*") hits an error with mismatched parentheis. Reported by Jan Engelhardt. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Find-Rule-0.33/MANIFEST new/File-Find-Rule-0.34/MANIFEST --- old/File-Find-Rule-0.33/MANIFEST 2011-09-19 13:49:49.000000000 +0200 +++ new/File-Find-Rule-0.34/MANIFEST 2015-12-03 15:30:12.000000000 +0100 @@ -12,3 +12,4 @@ testdir/foobar testdir/lib/File/Find/Rule/Test/ATeam.pm findrule +META.json Module JSON meta-data (added by MakeMaker) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Find-Rule-0.33/META.json new/File-Find-Rule-0.34/META.json --- old/File-Find-Rule-0.33/META.json 1970-01-01 01:00:00.000000000 +0100 +++ new/File-Find-Rule-0.34/META.json 2015-12-03 15:30:12.000000000 +0100 @@ -0,0 +1,45 @@ +{ + "abstract" : "unknown", + "author" : [ + "unknown" + ], + "dynamic_config" : 1, + "generated_by" : "ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version 2.133380", + "license" : [ + "unknown" + ], + "meta-spec" : { + "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec", + "version" : "2" + }, + "name" : "File-Find-Rule", + "no_index" : { + "directory" : [ + "t", + "inc" + ] + }, + "prereqs" : { + "build" : { + "requires" : { + "ExtUtils::MakeMaker" : "0" + } + }, + "configure" : { + "requires" : { + "ExtUtils::MakeMaker" : "0" + } + }, + "runtime" : { + "requires" : { + "File::Find" : "0", + "File::Spec" : "0", + "Number::Compare" : "0", + "Test::More" : "0", + "Text::Glob" : "0.07" + } + } + }, + "release_status" : "stable", + "version" : "0.34" +} diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Find-Rule-0.33/META.yml new/File-Find-Rule-0.34/META.yml --- old/File-Find-Rule-0.33/META.yml 2011-09-19 13:54:59.000000000 +0200 +++ new/File-Find-Rule-0.34/META.yml 2015-12-03 15:30:12.000000000 +0100 @@ -1,25 +1,26 @@ ---- #YAML:1.0 -name: File-Find-Rule -version: 0.33 -abstract: ~ -author: [] -license: unknown -distribution_type: module -configure_requires: - ExtUtils::MakeMaker: 0 +--- +abstract: unknown +author: + - unknown build_requires: - ExtUtils::MakeMaker: 0 -requires: - File::Find: 0 - File::Spec: 0 - Number::Compare: 0 - Test::More: 0 - Text::Glob: 0.07 -no_index: - directory: - - t - - inc -generated_by: ExtUtils::MakeMaker version 6.57_05 + ExtUtils::MakeMaker: 0 +configure_requires: + ExtUtils::MakeMaker: 0 +dynamic_config: 1 +generated_by: 'ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version 2.133380' +license: unknown meta-spec: - url: http://module-build.sourceforge.net/META-spec-v1.4.html - version: 1.4 + url: http://module-build.sourceforge.net/META-spec-v1.4.html + version: 1.4 +name: File-Find-Rule +no_index: + directory: + - t + - inc +requires: + File::Find: 0 + File::Spec: 0 + Number::Compare: 0 + Test::More: 0 + Text::Glob: 0.07 +version: 0.34 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Find-Rule-0.33/lib/File/Find/Rule.pm new/File-Find-Rule-0.34/lib/File/Find/Rule.pm --- old/File-Find-Rule-0.33/lib/File/Find/Rule.pm 2011-09-19 13:54:13.000000000 +0200 +++ new/File-Find-Rule-0.34/lib/File/Find/Rule.pm 2015-12-03 15:27:56.000000000 +0100 @@ -8,7 +8,7 @@ use Carp qw/croak/; use File::Find (); # we're only wrapping for now -our $VERSION = '0.33'; +our $VERSION = '0.34'; # we'd just inherit from Exporter, but I want the colon sub import { @@ -294,7 +294,7 @@ code => '(' . join( ' || ', map '( ' . $_->_compile . ' )', @_ ). ')', args => \@_, }; - + # merge all the subs hashes of the kids into ourself %{ $self->{subs} } = map { %{ $_->{subs} } } $self, @_; $self; @@ -323,7 +323,7 @@ args => \@_, code => '(' . join ( ' && ', map { "!(". $_->_compile . ")" } @_ ) . ")", }; - + # merge all the subs hashes into us %{ $self->{subs} } = map { %{ $_->{subs} } } $self, @_; $self; @@ -485,6 +485,23 @@ $self; } +=item C<canonpath> + +Normalize paths found using C<File::Spec->canonpath>. This will return paths +with a file-seperator that is native to your OS (as determined by L<File::Spec>), + instead of the default C</>. + +For example, this will return C<tmp/foobar> on Unix-ish OSes +and C<tmp\foobar> on Win32. + +=cut + +sub canonpath () { + my $self = _force_object shift; + $self->{canonpath} = 1; + $self; +} + =item C<not_*> Negated version of the rule. An effective shortand related to ! in @@ -544,6 +561,7 @@ my $maxdepth = $self->{maxdepth}; my $mindepth = $self->{mindepth}; my $relative = $self->{relative}; + my $canonpath = $self->{canonpath}; # figure out the relative path and depth my $relpath = $File::Find::name; @@ -564,10 +582,12 @@ return unless ' . $fragment . '; return if $discarded; if ($relative) { - push @found, $relpath if $relpath ne ""; + if ($relpath ne "") { + push @found, $canonpath ? File::Spec->canonpath($relpath) : $relpath; + } } else { - push @found, $path; + push @found, $canonpath ? File::Spec->canonpath($path) : $path; } }'; @@ -724,7 +744,7 @@ L<File::Find> to internally C<untaint> file paths with a regex like so: my $rule = File::Find::Rule->extras({ untaint => 1 }); - + Please consult L<File::Find>'s documentation for C<untaint>, C<untaint_pattern>, and C<untaint_skip> for more information. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Find-Rule-0.33/t/File-Find-Rule.t new/File-Find-Rule-0.34/t/File-Find-Rule.t --- old/File-Find-Rule-0.33/t/File-Find-Rule.t 2011-09-19 13:54:13.000000000 +0200 +++ new/File-Find-Rule-0.34/t/File-Find-Rule.t 2015-12-03 15:14:00.000000000 +0100 @@ -2,7 +2,8 @@ # $Id$ use strict; -use Test::More tests => 45; +use Test::More tests => 46; +use File::Spec; if (eval { require Test::Differences; 1 }) { no warnings; @@ -314,6 +315,10 @@ [ 'foobar' ], 'relative' ); +# normalize +is_deeply( [ find( 'canonpath', name => 'ATeam.pm', in => 'testdir' ) ], + [ File::Spec->catfile(qw(testdir lib File Find Rule Test ATeam.pm)) ], + 'canonpath' ); # bootstrapping extensions via import ++++++ cpanspec.yml ++++++ --- #description_paragraphs: 3 #no_testing: broken upstream #sources: # - source1 # - source2 #patches: # foo.patch: -p1 # bar.patch: #preamble: |- # BuildRequires: gcc-c++ #post_prep: |- # hunspell=`pkg-config --libs hunspell | sed -e 's,-l,,; s, *,,g'` # sed -i -e "s,hunspell-X,$hunspell," t/00-prereq.t Makefile.PL #post_install: |- # sed on %{name}.files #license: SUSE-NonFree #skip_noarch: 1 #custom_build: |- #./Build build flags=%{?_smp_mflags} --myflag #custom_test: |- #startserver && make test #ignore_requires: Bizarre::Module