[libclass-objecttemplate-perl] 01/03: autopkgtest tweak: use stdout instead of stderr for test suite output

[Niko Tyni]

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

ntyni pushed a commit to branch master
in repository libclass-objecttemplate-perl.

commit 61ce4e6553839dd866198362a9fa090123bcaec6
Author: Niko Tyni <ntyni at debian.org>
Date:   Sun May 17 15:59:51 2015 +0300

    autopkgtest tweak: use stdout instead of stderr for test suite output
---
 debian/patches/series      |  1 +
 debian/patches/test-stderr | 28 ++++++++++++++++++++++++++++
 2 files changed, 29 insertions(+)

diff --git a/debian/patches/series b/debian/patches/series
index fe54ca1..8f9cdfa 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1 +1,2 @@
+test-stderr
 defined-array.patch
diff --git a/debian/patches/test-stderr b/debian/patches/test-stderr
new file mode 100644
index 0000000..61a3b7a
--- /dev/null
+++ b/debian/patches/test-stderr
@@ -0,0 +1,28 @@
+Make test.pl output to STDOUT instead of STDERR
+
+This is in line with other CPAN modules.
+
+Also suppress the expected warning
+  Foo2 already has method: one at ./test.pl line 202.
+when requiring Foo2.pm.
+
+--- libclass-objecttemplate-perl.orig/test.pl
++++ libclass-objecttemplate-perl/test.pl
+@@ -199,7 +199,7 @@
+ EOT
+   close(F);
+ }
+-require Foo2;
++{ local $SIG{__WARN__} = sub {}; require Foo2; }
+ 
+ my $f = Foo2->new();
+ 
+@@ -235,6 +235,6 @@
+ 
+ sub result {
+   my $cond = shift;
+-  print STDERR "not " unless $cond;
+-  print STDERR "ok ", $i++, "\n";
++  print "not " unless $cond;
++  print "ok ", $i++, "\n";
+ }

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