<div>Hi.</div> <div> </div> <div>Trying to install Angerwhale and running into a problem with one of the tests for Catalyst::Plugin::ConfigLoader::Environment. I hope that it's okay to post this to this list. I would appreciate any help.</div> <div> </div> <div>The test (01-live.t) expects to find hash keys like 'foo' and 'bar' and 'foo_bar_baz'. Instead, they are all uppercase ('FOO' and 'BAR' and 'FOO_BAR_BAZ').</div> <div> </div> <div>I modified the test to print the contents of the hashref named "$config" to a file.</div> <div>Here is the modified test case, the result of 'make test', and the file with the values of $config.</div> <div> </div> <div>--- Modified content of test 01-live.t:</div> <div>C:\xampp\perl\cpan\build\Catalyst-Plugin-ConfigLoader-Environment-0.01\t>cat 01-live.t<BR>#!/usr/bin/perl<BR># 01-live.t<BR># Copyright (c) 2006 Jonathan Rockway <<A
href="mailto:jrockway@cpan.org">jrockway@cpan.org</A>></div> <div>use Test::More tests => 7;<BR>use FindBin qw($Bin);<BR>use lib "$Bin/lib";<BR>BEGIN {<BR> $ENV{TESTAPP_foo} = 'foo';<BR> $ENV{TESTAPP_bar} = 'bar';<BR> $ENV{TESTAPP_foo_bar_baz} = 'quux';<BR> $ENV{TESTAPP_View::TestView_foo} = "Test View's foo!";<BR>}</div> <div>use Catalyst::Test 'TestApp';</div> <div>ok(my $r = request('/'), 'request /');<BR>ok($r->is_success, 'that worked');</div> <div>my $config = eval $r->content;<BR>ok(ref $config, 'got config');</div> <div>#<BR># See what $config contains.<BR>#<BR>open my $ofh, ">", "test01.txt" || die $!;<BR>foreach my $key (keys %{$config}) {<BR> print $ofh "$key: " . $config->{$key} . "\n";<BR>}<BR>close $ofh;</div> <div><BR>is($config->{foo}, 'foo', 'got foo');<BR>is($config->{bar}, 'bar', 'got bar');<BR>is($config->{foo_bar_baz},
'quux', 'got foo_bar_baz');</div> <div>my $view = get('/foo');<BR>is($view, "Test View's foo!", 'got View::TestView->foo');</div> <div> </div> <div>--- Result of make test:</div> <div> </div> <div>C:\xampp\perl\cpan\build\Catalyst-Plugin-ConfigLoader-Environment-0.01>nmake test</div> <div>Microsoft (R) Program Maintenance Utility Version 8.00.50727.42<BR>Copyright (C) Microsoft Corporation. All rights reserved.</div> <div> C:\xampp\perl\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(0, 'inc', 'blib\lib', 'blib\arch')" t/00-load.t t/01-live.t t/boilerplate.t t/pod-coverage.t t/pod.t<BR>t/00-load.........ok 1/1# Testing Catalyst::Plugin::ConfigLoader::Environment 0.01, Perl 5.008008, C:\xampp\perl\bin\perl.exe<BR>t/00-load.........ok<BR>t/01-live.........ok 1/7<BR>t/01-live.........NOK 4# Failed test 'got foo'<BR># at t/01-live.t line
33.<BR># got: undef<BR># expected: 'foo'</div> <div>t/01-live.........NOK 5# Failed test 'got bar'<BR># at t/01-live.t line 34.<BR># got: undef<BR># expected: 'bar'</div> <div>t/01-live.........NOK 6# Failed test 'got foo_bar_baz'<BR># at t/01-live.t line 35.<BR># got: undef<BR># expected: 'quux'<BR>Use of uninitialized value in print at C:/xampp/perl/site/lib/Catalyst/Engine.pm<BR> line 583.<BR>t/01-live.........NOK 7<BR># Failed test 'got View::TestView->foo'<BR># at t/01-live.t line 38.<BR># got: ''<BR># expected: 'Test View's foo!'<BR># Looks like you failed 4 tests of
7.<BR>t/01-live.........dubious<BR> Test returned status 4 (wstat 1024, 0x400)<BR>DIED. FAILED tests 4-7<BR> Failed 4/7 tests, 42.86% okay<BR>t/boilerplate.....ok<BR>t/pod-coverage....ok<BR>t/pod.............ok<BR>Failed Test Stat Wstat Total Fail Failed List of Failed<BR>-------------------------------------------------------------------------------<BR>t/01-live.t 4 1024 7 4 57.14% 4-7<BR>Failed 1/5 test scripts, 80.00% okay. 4/13 subtests failed, 69.23% okay.<BR>NMAKE : fatal error U1077: 'C:\xampp\perl\bin\perl.exe' : return code '0xff'<BR>Stop.</div> <div> </div> <div>--- The actual values of $config:</div> <div> </div> <div>C:\xampp\perl\cpan\build\Catalyst-Plugin-ConfigLoader-Environment-0.01>cat test01.txt<BR>BAR: bar<BR>FOO_BAR_BAZ: quux<BR>root:
C:\xampp\perl\cpan\build\Catalyst-Plugin-ConfigLoader-Environment-0.01\t\lib\TestApp\root<BR>home: C:\xampp\perl\cpan\build\Catalyst-Plugin-ConfigLoader-Environment-0.01\t\lib\TestApp<BR>FOO: foo<BR>VIEW::TESTVIEW_FOO: Test View's foo!<BR><BR>Thanks!</div> <div> </div> <div>Greg</div>