Control: tag -1 + patch Control: forwarded -1 https://rt.cpan.org/Ticket/Display.html?id=86018
On Thu, 06 Jun 2013 22:38:46 +0100, Dominic Hargreaves wrote: > Source: libgit-pure-perl > Version: 0.48-2 > Severity: important > User: [email protected] > Usertags: perl-5.18-transition > Tags: sid jessie > > This package FTBFS with perl 5.18 from experimental (in a clean sbuild > session): > > syntax error at t/00_setup.t line 7, near "$name qw(test-project > test-project-packs test-project-packs2 test-encoding)" > Global symbol "$name" requires explicit package name at t/00_setup.t line 8. > Global symbol "$name" requires explicit package name at t/00_setup.t line 9. > syntax error at t/00_setup.t line 11, near "}" > Execution of t/00_setup.t aborted due to compilation errors. > t/00_setup.t ...... Patch attached that fixes the qw-in-list-context usage. Cheers, gregor -- .''`. Homepage: http://info.comodo.priv.at/ - OpenPGP key 0xBB3A68018649AA06 : :' : Debian GNU/Linux user, admin, and developer - http://www.debian.org/ `. `' Member of VIBE!AT & SPI, fellow of the Free Software Foundation Europe `-
diff -Nru libgit-pure-perl-0.48/debian/changelog libgit-pure-perl-0.48/debian/changelog --- libgit-pure-perl-0.48/debian/changelog 2012-01-21 16:06:22.000000000 +0100 +++ libgit-pure-perl-0.48/debian/changelog 2013-06-09 17:09:02.000000000 +0200 @@ -1,3 +1,12 @@ +libgit-pure-perl (0.48-2.1) UNRELEASED; urgency=low + + * Non-maintainer upload. + * Fix "FTBFS with perl 5.18: test failure": + add patch to fix qw-in-list-context error in test suite + (Closes: #711443) + + -- gregor herrmann <[email protected]> Sun, 09 Jun 2013 17:02:38 +0200 + libgit-pure-perl (0.48-2) unstable; urgency=low * d/control: Added DM-Upload diff -Nru libgit-pure-perl-0.48/debian/patches/qw-list.patch libgit-pure-perl-0.48/debian/patches/qw-list.patch --- libgit-pure-perl-0.48/debian/patches/qw-list.patch 1970-01-01 01:00:00.000000000 +0100 +++ libgit-pure-perl-0.48/debian/patches/qw-list.patch 2013-06-09 17:08:43.000000000 +0200 @@ -0,0 +1,30 @@ +Description: qw() in list context is an error now +Origin: vendor +Bug-Debian: http://bugs.debian.org/711443 +Bug: https://rt.cpan.org/Ticket/Display.html?id=86018 +Forwarded: https://rt.cpan.org/Ticket/Display.html?id=86018 +Author: gregor herrmann <[email protected]> +Last-Update: 2013-06-09 + +--- a/t/00_setup.t ++++ b/t/00_setup.t +@@ -4,7 +4,7 @@ + use Test::More; + use Archive::Extract; + +-foreach my $name qw(test-project test-project-packs test-project-packs2 test-encoding) { ++foreach my $name (qw(test-project test-project-packs test-project-packs2 test-encoding)) { + next if -d $name; + my $ae = Archive::Extract->new( archive => "$name.tgz" ); + $ae->extract; +--- a/t/simple.t ++++ b/t/simple.t +@@ -7,7 +7,7 @@ + + my $checkout_directory = dir('t/checkout'); + +-foreach my $directory qw(test-project test-project-packs test-project-packs2) ++foreach my $directory (qw(test-project test-project-packs test-project-packs2)) + { + my $git = Git::PurePerl->new( directory => $directory ); + like( $git->master_sha1, qr/^[a-z0-9]{40}$/ ); diff -Nru libgit-pure-perl-0.48/debian/patches/series libgit-pure-perl-0.48/debian/patches/series --- libgit-pure-perl-0.48/debian/patches/series 2012-01-21 16:06:22.000000000 +0100 +++ libgit-pure-perl-0.48/debian/patches/series 2013-06-09 17:05:51.000000000 +0200 @@ -1 +1,2 @@ disable_test.patch +qw-list.patch
signature.asc
Description: Digital signature
