X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Fplack-middleware.t;h=f6bf563355e5dbbebc135400411971d27d891974;hp=4cc3e72d1ec9049bc52e8b5a4e4118bb75daed97;hb=1d285816f88ccd8b81e733565ca4363140b75ec8;hpb=10e392678f09e8b9614aa0042113921ba5bff963

diff --git a/t/plack-middleware.t b/t/plack-middleware.t
index 4cc3e72..f6bf563 100644
--- a/t/plack-middleware.t
+++ b/t/plack-middleware.t
@@ -54,4 +54,15 @@ ok my($res, $c) = ctx_request('/');
   ok $response->headers->{"x-runtime"}, "Got value for expected middleware";
 }
 
+{
+  my $total_mw = scalar(TestMiddleware->registered_middlewares);
+
+  TestMiddleware->setup_middleware;
+  TestMiddleware->setup_middleware;
+
+  my $post_mw = scalar(TestMiddleware->registered_middlewares);
+
+  is $total_mw, $post_mw, 'Calling ->setup_middleware does not re-add default middleware';
+}
+
 done_testing;