[libfile-rsync-perl] 01/02: Add patch skipping badoption test in autopkgtest

[Lucas Kanashiro]

This is an automated email from the git hooks/post-receive script.

kanashiro-guest pushed a commit to branch master
in repository libfile-rsync-perl.

commit 87de1d1cdaa215382398bb8a5c5503686f0b6026
Author: Lucas Kanashiro <kanashiro.duarte at gmail.com>
Date:   Sun Aug 16 17:25:09 2015 -0300

    Add patch skipping badoption test in autopkgtest
    
    This test print some stuff in stderr and autopkgtest consider it as a failure.
---
 debian/changelog                                   |  2 ++
 debian/patches/series                              |  1 +
 .../skip-badoption-test-in-autopkgtest.patch       | 39 ++++++++++++++++++++++
 3 files changed, 42 insertions(+)

diff --git a/debian/changelog b/debian/changelog
index 18acf03..a7a12c7 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -24,6 +24,8 @@ libfile-rsync-perl (0.45-1) UNRLEASED; urgency=low
   * Bump debhelper compatibility level to 9
   * Add autopkgtest-pkg-perl
   * Update year of upstream copyright
+  * Add patch skipping badoption test in autopkgtest. This test print some
+    stuff in stderr and autopkgtest consider it as a failure.
 
   [ gregor herrmann ]
   * debian/rules: drop override. The file we removed is gone.
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..4390f90
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+skip-badoption-test-in-autopkgtest.patch
diff --git a/debian/patches/skip-badoption-test-in-autopkgtest.patch b/debian/patches/skip-badoption-test-in-autopkgtest.patch
new file mode 100644
index 0000000..8be1ee8
--- /dev/null
+++ b/debian/patches/skip-badoption-test-in-autopkgtest.patch
@@ -0,0 +1,39 @@
+Description: skip tests in installed version
+ Skip badoption test in installed version, autopkgtest, because this
+ test print some stuff in stderr. Autopkgtest consider anything in stderr
+ as a failure.
+Forwarded: not-needed
+Author: Lucas Kanashiro <kanashiro.duarte at gmail.com>
+Last-Update: 2015-08-16
+
+--- a/test.pl
++++ b/test.pl
+@@ -8,7 +8,7 @@ use strict;
+ use vars qw($loaded $fail);
+ $loaded=1;
+ $fail=0;
+-warn "\nNOTE: expect 'badoption' message for test 7\n\n";
++warn "\nNOTE: expect 'badoption' message for test 7\n\n" if(!$ENV{ADTTMP});
+ print "ok 1\n";
+ 
+ unless (whence('rsync')) {
+@@ -83,12 +83,14 @@ system qw(rm -rf destdir);
+    print "ok 6\n";
+ }
+ 
+-system qw(rm -rf destdir);
++if(!$ENV{ADTTMP}) {
++   system qw(rm -rf destdir);
+ # invalid option
+-{
+-   my $rs=File::Rsync->new(archive => 1, badoption => 1);
+-   $rs && ($fail++,print "not ");
+-   print "ok 7\n";
++   {
++      my $rs=File::Rsync->new(archive => 1, badoption => 1);
++      $rs && ($fail++,print "not ");
++      print "ok 7\n";
++   }
+ }
+ 
+ system qw(rm -rf destdir);

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libfile-rsync-perl.git