better error messages when the middleware does not exist

[catagits/Catalyst-Runtime.git] / t / bad_middleware_error.t

diff --git a/t/bad_middleware_error.t b/t/bad_middleware_error.t
new file mode 100644 (file)
index 0000000..7018ea9
--- /dev/null
+++ b/t/bad_middleware_error.t
@@ -0,0 +1,16 @@
+#!/usr/bin/env perl
+
+{
+  package MyApp;
+
+  use Catalyst;
+  use Test::More;
+
+  eval {
+    __PACKAGE__->setup_middleware('DoesNotExist'); 1;
+  } || do {
+    like($@, qr/MyApp::Middleware::DoesNotExist or Plack::Middleware::DoesNotExist/);
+  };
+
+  done_testing;
+}