| Subject: | Broken tests again |
There is an error in some test scripts: error checking is not made
after some eval's, and continuous eval's clear errors for previous
eval's.
Diff for some of such tests, which didn't work on my system, is here:
------------------------ cut ------------------------
diff --git a/t/07_apphandlers/03_psgi_app.t b/
t/07_apphandlers/03_psgi_app.t
index 1647c89..f81a474 100644
--- a/t/07_apphandlers/03_psgi_app.t
+++ b/t/07_apphandlers/03_psgi_app.t
@@ -2,8 +2,10 @@ use Dancer::Config 'setting';
use Test::More;
eval "use Test::Requires ('Plack::Loader', 'LWP::UserAgent')";
+plan skip_all => "Test::Requires needed for this test" if $@;
+
eval "use Test::TCP";
-plan skip_all => "Test::Requires and Test::TCP are needed for this
test" if $@;
+plan skip_all => "Test::TCP needed for this test" if $@;
my $app = sub {
diff --git a/t/07_apphandlers/04_standalone_app.t b/
t/07_apphandlers/04_standalone_app.t
index 3087444..b35dbb9 100644
--- a/t/07_apphandlers/04_standalone_app.t
+++ b/t/07_apphandlers/04_standalone_app.t
@@ -2,8 +2,10 @@ use Dancer::Config 'setting';
use Test::More;
eval "use Test::Requires ('LWP::UserAgent')";
+plan skip_all => "Test::Requires needed for this test" if $@;
+
eval "use Test::TCP";
-plan skip_all => "Test::Requires and Test::TCP are needed for this
test" if $@;
+plan skip_all => "Test::TCP needed for this test" if $@;
plan tests => 4;
test_tcp(
------------------------ cut ------------------------
I think, you should also check other scripts for the possibility of the
same error. Used version of Perl is 5.10.0.