Hello community,

here is the log from the commit of package perl-File-Rsync for openSUSE:Factory 
checked in at 2015-09-24 06:15:54
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-File-Rsync (Old)
 and      /work/SRC/openSUSE:Factory/.perl-File-Rsync.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-File-Rsync"

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-File-Rsync/perl-File-Rsync.changes  
2015-08-27 08:56:31.000000000 +0200
+++ /work/SRC/openSUSE:Factory/.perl-File-Rsync.new/perl-File-Rsync.changes     
2015-09-24 06:16:20.000000000 +0200
@@ -1,0 +2,28 @@
+Tue Sep 22 09:04:10 UTC 2015 - [email protected]
+
+- updated to 0.48
+   see /usr/share/doc/packages/perl-File-Rsync/Changelog
+
+  Mon Sep 21 15:58:35 CDT 2015 ( leakin at dfw dot nostrum dot com )
+  
+       * version 0.48: fix list option parsing
+  
+       Bill Shunn ( proprietor at shunn dot net ) found a bug in list option
+       parsing that broke filters (and probably others as well).
+
+-------------------------------------------------------------------
+Sun Sep 20 08:53:10 UTC 2015 - [email protected]
+
+- updated to 0.47
+   see /usr/share/doc/packages/perl-File-Rsync/Changelog
+
+  Fri Sep 11 08:36:39 CDT 2015 ( leakin at dfw dot nostrum dot com )
+  
+       * version 0.47: fixed hash ref parsing
+  
+       Andreas Koenig ( andk at cpan dot org ) pointed out a problem
+       with the hash ref compatibility code, and then graciously provided
+       a test case to help me track down the problem. Added another
+       test to confirm.
+
+-------------------------------------------------------------------

Old:
----
  File-Rsync-0.46.tar.gz

New:
----
  File-Rsync-0.48.tar.gz

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

Other differences:
------------------
++++++ perl-File-Rsync.spec ++++++
--- /var/tmp/diff_new_pack.pTuZz8/_old  2015-09-24 06:16:21.000000000 +0200
+++ /var/tmp/diff_new_pack.pTuZz8/_new  2015-09-24 06:16:21.000000000 +0200
@@ -17,7 +17,7 @@
 
 
 Name:           perl-File-Rsync
-Version:        0.46
+Version:        0.48
 Release:        0
 %define cpan_name File-Rsync
 Summary:        Perl Module Interface to Rsync(1) 
F<Http://Rsync.Samba.Org/Rsync/>

++++++ File-Rsync-0.46.tar.gz -> File-Rsync-0.48.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Rsync-0.46/Changelog 
new/File-Rsync-0.48/Changelog
--- old/File-Rsync-0.46/Changelog       2015-07-30 16:26:17.000000000 +0200
+++ new/File-Rsync-0.48/Changelog       2015-09-21 23:00:34.000000000 +0200
@@ -1,3 +1,19 @@
+Mon Sep 21 15:58:35 CDT 2015 ( leakin at dfw dot nostrum dot com )
+
+       * version 0.48: fix list option parsing
+
+       Bill Shunn ( proprietor at shunn dot net ) found a bug in list option
+       parsing that broke filters (and probably others as well).
+
+Fri Sep 11 08:36:39 CDT 2015 ( leakin at dfw dot nostrum dot com )
+
+       * version 0.47: fixed hash ref parsing
+
+       Andreas Koenig ( andk at cpan dot org ) pointed out a problem
+       with the hash ref compatibility code, and then graciously provided
+       a test case to help me track down the problem. Added another
+       test to confirm.
+
 Wed Jul 29 09:32:05 CDT 2015 ( leakin at dfw dot nostrum dot com )
 
        * version 0.46: added support for new options up to 3.1.1
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Rsync-0.46/META.json 
new/File-Rsync-0.48/META.json
--- old/File-Rsync-0.46/META.json       2015-08-11 15:53:51.000000000 +0200
+++ new/File-Rsync-0.48/META.json       2015-09-21 23:03:06.000000000 +0200
@@ -4,7 +4,7 @@
       "Lee Eakin <[email protected]>"
    ],
    "dynamic_config" : 1,
-   "generated_by" : "ExtUtils::MakeMaker version 7.04, CPAN::Meta::Converter 
version 2.150005",
+   "generated_by" : "ExtUtils::MakeMaker version 7.1, CPAN::Meta::Converter 
version 2.150005",
    "license" : [
       "unknown"
    ],
@@ -40,6 +40,6 @@
       }
    },
    "release_status" : "stable",
-   "version" : "0.46",
+   "version" : "0.48",
    "x_serialization_backend" : "JSON::PP version 2.27200"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Rsync-0.46/META.yml new/File-Rsync-0.48/META.yml
--- old/File-Rsync-0.46/META.yml        2015-08-11 15:53:50.000000000 +0200
+++ new/File-Rsync-0.48/META.yml        2015-09-21 23:03:06.000000000 +0200
@@ -7,7 +7,7 @@
 configure_requires:
   ExtUtils::MakeMaker: '0'
 dynamic_config: 1
-generated_by: 'ExtUtils::MakeMaker version 7.04, CPAN::Meta::Converter version 
2.150005'
+generated_by: 'ExtUtils::MakeMaker version 7.1, CPAN::Meta::Converter version 
2.150005'
 license: unknown
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -22,5 +22,5 @@
   IPC::Run3: '0'
   Scalar::Util: '0'
   Test::More: '0'
-version: '0.46'
+version: '0.48'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.016'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Rsync-0.46/Rsync.pm new/File-Rsync-0.48/Rsync.pm
--- old/File-Rsync-0.46/Rsync.pm        2015-08-07 15:38:54.000000000 +0200
+++ new/File-Rsync-0.48/Rsync.pm        2015-09-21 22:58:19.000000000 +0200
@@ -23,7 +23,7 @@
 use strict;
 use vars qw($VERSION);
 
-$VERSION = '0.46';
+$VERSION = '0.48';
 
 =head1 NAME
 
@@ -502,7 +502,9 @@
             }
          }
          if ($opt eq '_args') {
-            push @{$runopts{$opt}}, @{$execopts->{$opt}};
+            # only preserve order if we already have order
+            push @{$runopts{$opt}}, @{$execopts->{$opt}}
+               if @{$runopts{$opt}};
          } elsif ($opt eq 'source' or $opt eq 'dest') {
             $runopts{$opt} = $execopts->{$opt};
          } else {
@@ -514,7 +516,7 @@
    }
 
    if (
-      !$merged->{_args}    # include and exclude allowed if ordered args
+      !@{$merged->{_args}}    # include and exclude allowed if ordered args
       && ( (@{$merged->{list}{exclude}} != 0)
          + (@{$merged->{list}{include}} != 0)
          + (@{$merged->{list}{filter}} != 0) > 1)
@@ -531,7 +533,7 @@
    # build the real command
    my @cmd = ($merged->{_perlopts}{'path-to-rsync'});
 
-   if ($merged->{_args}) {    # prefer ordered args if we have them
+   if (@{$merged->{_args}}) {    # prefer ordered args if we have them
       my $gotsrc;
       for (my $e = 0; $e < @{$merged->{_args}}; $e += 2) {
          my $key = $merged->{_args}[$e];
@@ -604,7 +606,7 @@
       }
       for my $opt (sort keys %{$merged->{list}}) {
          next if $opt eq 'literal';
-         for my $val (@{$merged->{$opt}}) {
+         for my $val (@{$merged->{list}{$opt}}) {
             push @cmd, "--$opt=$val";
          }
       }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/File-Rsync-0.46/test.pl new/File-Rsync-0.48/test.pl
--- old/File-Rsync-0.46/test.pl 2015-08-11 15:51:14.000000000 +0200
+++ new/File-Rsync-0.48/test.pl 2015-09-11 15:34:57.000000000 +0200
@@ -100,6 +100,18 @@
    ok($rs, 'deprecated hash ref');
 }
 
+# mixed hash ref and non
+{
+   my $ok;
+   my $rs = File::Rsync->new({archive => 1});
+   if ($rs) {
+      my $cmd = $rs->getcmd(src => 'blib', dest => 'destdir');
+      diag "checking [@$cmd]";
+      $ok = "@$cmd" eq 'rsync --archive blib destdir';
+   }
+   ok($rs && $ok, 'mixed hash ref and non');
+}
+
 SKIP: {
    skip "old rsync, no --files-from option", 2
       unless have_files_from('rsync');


Reply via email to