On Sat, 08 Jun 2013 13:00:24 +0100, Dominic Hargreaves wrote: > Source: libyaml-appconfig-perl > Version: 0.16-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): > > t/00-load.t ..... ok > syntax error at t/01-basic.t line 14, near "$var qw(foo bar)"
This one is easy to fix [0], but then t/05-scoping fails
occasionally, which looks like hash randomization:
# Failed test 'Checking circular dynamic variables.'
# at t/05-scoping.t line 46.
# 'Circular reference in cows_are_good. at t/05-scoping.t
line 45.
# '
# doesn't match '(?^:Circular reference in prolog)'
# Looks like you failed 1 test of 9.
t/05-scoping.t ..
Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/9 subtests
Cheers,
gregor, forwarding upstream
[0]
#v+
--- a/t/01-basic.t
+++ b/t/01-basic.t
@@ -11,7 +11,7 @@
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 @@
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." );
#v-
--
.''`. 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
`- NP: Don McLean: Babylon
signature.asc
Description: Digital signature

