Remove redundant ->setup call in t/head_middleware.t RT#95361

Now that %INC is being populated earlier and the first ->setup call
succeeds, test that and remove the the second one.

diff --git a/Changes b/Changes
index 9e59e89..86c8a1f 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,6 +1,7 @@
 # This file documents the revision history for Perl extension Catalyst.
 
   - Fix spelling, grammar and structural errors in POD
+  - Remove redundant ->setup call in t/head_middleware.t RT#95361
 
 5.90064 - 2014-05-05
   - Fix for mindless broken tests on Win32 (Haarg++).

diff --git a/t/head_middleware.t b/t/head_middleware.t
index ff7afcf..baf560a 100644 (file)
--- a/t/head_middleware.t
+++ b/t/head_middleware.t
@@ -23,11 +23,10 @@ use Plack::Test;
   package MyApp;
   use Catalyst;
 
-  MyApp->setup;
+  Test::More::ok(MyApp->setup, 'setup app');
 }
 
 
-Test::More::ok(MyApp->setup);
 
 ok my $psgi = MyApp->psgi_app, 'build psgi app';