Hello community,

here is the log from the commit of package perl-File-Path for openSUSE:Factory 
checked in at 2020-11-10 13:38:41
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-File-Path (Old)
 and      /work/SRC/openSUSE:Factory/.perl-File-Path.new.11331 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-File-Path"

Tue Nov 10 13:38:41 2020 rev:7 rq:846187 version:2.180000

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-File-Path/perl-File-Path.changes    
2020-08-04 20:16:12.760858438 +0200
+++ /work/SRC/openSUSE:Factory/.perl-File-Path.new.11331/perl-File-Path.changes 
2020-11-10 13:39:23.816480232 +0100
@@ -1,0 +2,10 @@
+Thu Nov  5 03:08:34 UTC 2020 - Tina Müller <timueller+p...@suse.de>
+
+- updated to 2.18
+   see /usr/share/doc/packages/perl-File-Path/Changes
+
+  2.18 Wed Nov  4 20:21:01 EST 2020
+      - Silence two warnings in t/Path.t when run on Win32
+        (RT 133671 - thanks to Tony Cook).
+
+-------------------------------------------------------------------

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

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

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

Other differences:
------------------
++++++ perl-File-Path.spec ++++++
--- /var/tmp/diff_new_pack.McRPZz/_old  2020-11-10 13:39:24.740478397 +0100
+++ /var/tmp/diff_new_pack.McRPZz/_new  2020-11-10 13:39:24.740478397 +0100
@@ -17,10 +17,10 @@
 
 
 Name:           perl-File-Path
-Version:        2.170000
+Version:        2.180000
 Release:        0
-%define cpan_version 2.17
-Provides:       perl(File::Path) = 2.170000
+%define cpan_version 2.18
+Provides:       perl(File::Path) = 2.180000
 #Upstream:  James Keenan and Richard Elberger 1995-2020. All rights reserved.
 %define cpan_name File-Path
 Summary:        Create or remove directory trees

++++++ File-Path-2.17.tar.gz -> File-Path-2.18.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Path-2.17/Changes new/File-Path-2.18/Changes
--- old/File-Path-2.17/Changes  2020-07-18 20:18:06.000000000 +0200
+++ new/File-Path-2.18/Changes  2020-11-05 02:22:49.000000000 +0100
@@ -1,5 +1,9 @@
 Revision history for Perl extension File::Path.
 
+2.18 Wed Nov  4 20:21:01 EST 2020
+    - Silence two warnings in t/Path.t when run on Win32
+      (RT 133671 - thanks to Tony Cook).
+
 2.17 2020-07-18
     - Eliminate one line of debugging code which was generating
       a warning.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Path-2.17/META.json new/File-Path-2.18/META.json
--- old/File-Path-2.17/META.json        2020-07-18 20:24:46.000000000 +0200
+++ new/File-Path-2.18/META.json        2020-11-05 02:27:09.000000000 +0100
@@ -59,6 +59,6 @@
          "web" : "https://github.com/jkeenan/File-Path";
       }
    },
-   "version" : "2.17",
+   "version" : "2.18",
    "x_serialization_backend" : "JSON::PP version 4.04"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Path-2.17/META.yml new/File-Path-2.18/META.yml
--- old/File-Path-2.17/META.yml 2020-07-18 20:24:46.000000000 +0200
+++ new/File-Path-2.18/META.yml 2020-11-05 02:27:09.000000000 +0100
@@ -31,5 +31,5 @@
   File::Spec: '0'
 resources:
   repository: https://github.com/jkeenan/File-Path.git
-version: '2.17'
+version: '2.18'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Path-2.17/lib/File/Path.pm 
new/File-Path-2.18/lib/File/Path.pm
--- old/File-Path-2.17/lib/File/Path.pm 2020-07-18 20:19:15.000000000 +0200
+++ new/File-Path-2.18/lib/File/Path.pm 2020-11-05 02:20:25.000000000 +0100
@@ -18,7 +18,7 @@
 
 use Exporter ();
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
-$VERSION   = '2.17';
+$VERSION   = '2.18';
 $VERSION   = eval $VERSION;
 @ISA       = qw(Exporter);
 @EXPORT    = qw(mkpath rmtree);
@@ -633,7 +633,7 @@
 
 =head1 VERSION
 
-2.17 - released July 18 2020.
+2.18 - released November 4 2020.
 
 =head1 SYNOPSIS
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Path-2.17/t/Path.t new/File-Path-2.18/t/Path.t
--- old/File-Path-2.17/t/Path.t 2017-07-30 04:05:36.000000000 +0200
+++ new/File-Path-2.18/t/Path.t 2020-11-04 05:15:56.000000000 +0100
@@ -3,7 +3,7 @@
 
 use strict;
 
-use Test::More tests => 165;
+use Test::More tests => 167;
 use Config;
 use Fcntl ':mode';
 use lib './t';
@@ -845,7 +845,18 @@
     my ($least_deep, $next_deepest, $deepest) =
         create_3_level_subdirs( qw| b5wj8CJcc7gl XTJe2C3WGLg5 VZ_y2T0XfKu3 | );
     my (@created, $error);
+    my $warn;
+    local $SIG{__WARN__} = sub { $warn = shift };
     @created = mkpath($deepest, { mode => 0711, uid => $>, error => \$error });
+    SKIP: {
+        my $skip_count = 1;
+        skip "Warning should only appear on Windows", $skip_count
+            unless $^O eq 'MSWin32';
+        like($warn,
+            qr/Option\(s\) implausible on Win32 passed to mkpath\(\) or 
make_path\(\)/,
+            'make_path with final hashref warned due to options implausible on 
Win32'
+        );
+    }
     is(scalar(@created), 3, "Provide valid 'uid' argument: 3 subdirectories 
created");
 
     cleanup_3_level_subdirs($least_deep);
@@ -897,7 +908,18 @@
     my ($least_deep, $next_deepest, $deepest) =
         create_3_level_subdirs( qw| BEcigvaBNisY rd4lJ1iZRyeS OyQnDPIBxP2K | );
     my (@created, $error);
+    my $warn;
+    local $SIG{__WARN__} = sub { $warn = shift };
     @created = mkpath($deepest, { mode => 0711, group => $(, error => \$error 
});
+    SKIP: {
+        my $skip_count = 1;
+        skip "Warning should only appear on Windows", $skip_count
+            unless $^O eq 'MSWin32';
+        like($warn,
+            qr/Option\(s\) implausible on Win32 passed to mkpath\(\) or 
make_path\(\)/,
+            'make_path with final hashref warned due to options implausible on 
Win32'
+        );
+    }
     is(scalar(@created), 3, "Provide valid 'group' argument: 3 subdirectories 
created");
 
     cleanup_3_level_subdirs($least_deep);


Reply via email to