Hello community,

here is the log from the commit of package perl-File-Path for openSUSE:Factory 
checked in at 2017-08-06 11:24:57
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-File-Path (Old)
 and      /work/SRC/openSUSE:Factory/.perl-File-Path.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-File-Path"

Sun Aug  6 11:24:57 2017 rev:4 rq:514085 version:2.150000

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-File-Path/perl-File-Path.changes    
2017-06-27 10:20:57.757821420 +0200
+++ /work/SRC/openSUSE:Factory/.perl-File-Path.new/perl-File-Path.changes       
2017-08-06 11:24:58.406483255 +0200
@@ -1,0 +2,9 @@
+Mon Jul 31 05:32:54 UTC 2017 - co...@suse.com
+
+- updated to 2.15
+   see /usr/share/doc/packages/perl-File-Path/Changes
+
+  2.15 2017-07-29
+      - Correct documentation error re possible arguments for rmtree().
+
+-------------------------------------------------------------------

Old:
----
  File-Path-2.14.tar.gz

New:
----
  File-Path-2.15.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-File-Path.spec ++++++
--- /var/tmp/diff_new_pack.nfszlW/_old  2017-08-06 11:24:59.506328309 +0200
+++ /var/tmp/diff_new_pack.nfszlW/_new  2017-08-06 11:24:59.514327183 +0200
@@ -17,10 +17,10 @@
 
 
 Name:           perl-File-Path
-Version:        2.140000
+Version:        2.150000
 Release:        0
-%define cpan_version 2.14
-Provides:       perl(File::Path) = 2.140000
+%define cpan_version 2.15
+Provides:       perl(File::Path) = 2.150000
 #Upstream:  James Keenan and Richard Elberger 1995-2017. All rights reserved.
 %define cpan_name File-Path
 Summary:        Create or remove directory trees

++++++ File-Path-2.14.tar.gz -> File-Path-2.15.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Path-2.14/Changes new/File-Path-2.15/Changes
--- old/File-Path-2.14/Changes  2017-06-07 23:30:37.000000000 +0200
+++ new/File-Path-2.15/Changes  2017-07-30 04:32:39.000000000 +0200
@@ -1,5 +1,8 @@
 Revision history for Perl extension File::Path.
 
+2.15 2017-07-29
+    - Correct documentation error re possible arguments for rmtree().
+
 2.14 2017-06-07
     - When creating subdirectories for testing underneath
       File::Spec::Functions::tmpdir(), use randomly generated strings.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Path-2.14/META.json new/File-Path-2.15/META.json
--- old/File-Path-2.14/META.json        2017-06-07 23:31:31.000000000 +0200
+++ new/File-Path-2.15/META.json        2017-07-30 04:35:09.000000000 +0200
@@ -59,6 +59,6 @@
          "web" : "https://github.com/jkeenan/File-Path";
       }
    },
-   "version" : "2.14",
+   "version" : "2.15",
    "x_serialization_backend" : "JSON::PP version 2.27400_02"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Path-2.14/META.yml new/File-Path-2.15/META.yml
--- old/File-Path-2.14/META.yml 2017-06-07 23:31:31.000000000 +0200
+++ new/File-Path-2.15/META.yml 2017-07-30 04:35:09.000000000 +0200
@@ -31,5 +31,5 @@
   File::Spec: '0'
 resources:
   repository: https://github.com/jkeenan/File-Path.git
-version: '2.14'
+version: '2.15'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Path-2.14/lib/File/Path.pm 
new/File-Path-2.15/lib/File/Path.pm
--- old/File-Path-2.14/lib/File/Path.pm 2017-06-07 23:28:31.000000000 +0200
+++ new/File-Path-2.15/lib/File/Path.pm 2017-07-30 04:31:26.000000000 +0200
@@ -18,7 +18,7 @@
 
 use Exporter ();
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
-$VERSION   = '2.14';
+$VERSION   = '2.15';
 $VERSION   = eval $VERSION;
 @ISA       = qw(Exporter);
 @EXPORT    = qw(mkpath rmtree);
@@ -633,7 +633,7 @@
 
 =head1 VERSION
 
-2.14 - released June 07 2016.
+2.15 - released June 07 2017.
 
 =head1 SYNOPSIS
 
@@ -774,12 +774,14 @@
 
 The C<remove_tree> function deletes the given directories and any
 files and subdirectories they might contain, much like the Unix
-command C<rm -rf> or the Windows commands C<rmdir /s> and C<rd /s>. The
-only exception to the function similarity is that C<remove_tree> accepts
-only directories whereas C<rm -rf> also accepts files.
+command C<rm -rf> or the Windows commands C<rmdir /s> and C<rd /s>.
 
-The function accepts a list of directories to be
-removed. Its behaviour may be tuned by an optional hashref
+The function accepts a list of directories to be removed. (In point of fact,
+it will also accept filesystem entries which are not directories, such as
+regular files and symlinks.  But, as its name suggests, its intent is to
+remove trees rather than individual files.)
+
+C<remove_tree()>'s behaviour may be tuned by an optional hashref
 appearing as the last parameter on the call.  If an empty string is
 passed to C<remove_tree>, an error will occur.
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Path-2.14/t/Path.t new/File-Path-2.15/t/Path.t
--- old/File-Path-2.14/t/Path.t 2017-06-07 23:14:17.000000000 +0200
+++ new/File-Path-2.15/t/Path.t 2017-07-30 04:05:36.000000000 +0200
@@ -3,7 +3,7 @@
 
 use strict;
 
-use Test::More tests => 167;
+use Test::More tests => 165;
 use Config;
 use Fcntl ':mode';
 use lib './t';
@@ -816,7 +816,7 @@
 }
 
 SKIP: {
-    my $skip_count = 5;
+    my $skip_count = 3;
     skip "Windows will not set this error condition", $skip_count
         if $^O eq 'MSWin32';
 
@@ -826,10 +826,10 @@
     my (@created, $error);
     my $user = join('_' => 'foobar', $$);
     @created = mkpath($deepest, { mode => 0711, user => $user, error => 
\$error });
-    TODO: {
-        local $TODO = "Notwithstanding the phony 'user', mkpath will actually 
create subdirectories; should it?";
-        is(scalar(@created), 0, "No subdirectories created");
-    }
+#    TODO: {
+#        local $TODO = "Notwithstanding the phony 'user', mkpath will actually 
create subdirectories; should it?";
+#        is(scalar(@created), 0, "No subdirectories created");
+#    }
     is(scalar(@$error), 1, "caught error condition" );
     my ($file, $message) = each %{$error->[0]};
     like($message,
@@ -878,10 +878,10 @@
     my (@created, $error);
     my $bad_group = join('_' => 'foobarbaz', $$);
     @created = mkpath($deepest, { mode => 0711, group => $bad_group, error => 
\$error });
-    TODO: {
-        local $TODO = "Notwithstanding the phony 'group', mkpath will actually 
create subdirectories; should it?";
-        is(scalar(@created), 0, "No subdirectories created");
-    }
+#    TODO: {
+#        local $TODO = "Notwithstanding the phony 'group', mkpath will 
actually create subdirectories; should it?";
+#        is(scalar(@created), 0, "No subdirectories created");
+#    }
     is(scalar(@$error), 1, "caught error condition" );
     my ($file, $message) = each %{$error->[0]};
     like($message,


Reply via email to