[libyaml-appconfig-perl] 01/01: add patch fixing missing ()s around qw() iteration

Damyan Ivanov dmn at alioth.debian.org
Thu Sep 26 19:37:54 UTC 2013


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

dmn pushed a commit to branch master
in repository libyaml-appconfig-perl.

commit 3d0cdc69b719725ccf4165128efeae99ede3941d
Author: Damyan Ivanov <dmn at debian.org>
Date:   Thu Sep 26 19:37:46 2013 +0000

    add patch fixing missing ()s around qw() iteration
    
    authored by gregor in #711627
---
 debian/patches/qw-parenthesis.patch |   26 ++++++++++++++++++++++++++
 debian/patches/series               |    1 +
 2 files changed, 27 insertions(+)

diff --git a/debian/patches/qw-parenthesis.patch b/debian/patches/qw-parenthesis.patch
new file mode 100644
index 0000000..e9ed984
--- /dev/null
+++ b/debian/patches/qw-parenthesis.patch
@@ -0,0 +1,26 @@
+Description: add ()s around qw() iteration
+ This is mandatory with perl 5.18
+Author: gregor herrmann <gregoa at debian.org>
+Bug-Debian: http://bugs.debian.org/711627
+Bug: http://rt.cpan.org/Public/Bug/Display.html?id=85987
+
+--- a/t/01-basic.t
++++ b/t/01-basic.t
+@@ -11,7 +11,7 @@ BEGIN { use_ok('YAML::AppConfig') }
+     ok( $app, "Instantiated object from file." );
+     isa_ok( $app, "YAML::AppConfig", "Asserting isa YAML::AppConfig" );
+     my $c = 1;
+-    for my $var qw(foo bar) {
++    for my $var ( qw(foo bar) ) {
+         is( $app->get($var), $c, "Retrieving value for $var." );
+         my $method = "get_$var";
+         ok( $app->can($method), "Checking that \$app can get_$var." );
+@@ -31,7 +31,7 @@ BEGIN { use_ok('YAML::AppConfig') }
+     ok( $app, "Instantiated object from string." );
+     isa_ok( $app, "YAML::AppConfig", "Asserting isa YAML::AppConfig" );
+     my $c = 1;
+-    for my $var qw(foo bar) {
++    for my $var ( qw(foo bar) ) {
+         is( $app->get($var), $c, "Retrieving value for $var." );
+         my $method = "get_$var";
+         ok( $app->can($method), "Checking that \$app can get_$var." );
diff --git a/debian/patches/series b/debian/patches/series
index 28801f0..fc442a8 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,2 +1,3 @@
 no-UNIVERSAL-import.patch
 fix-POD-errors.patch
+qw-parenthesis.patch

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



More information about the Pkg-perl-cvs-commits mailing list