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

Reply via email to