Added a test that warnings do get thrown if appclass actions are used.

[catagits/Catalyst-Runtime.git] / t / lib / DeprecatedActionsInAppClassTestApp.pm

diff --git a/t/lib/DeprecatedActionsInAppClassTestApp.pm b/t/lib/DeprecatedActionsInAppClassTestApp.pm
new file mode 100644 (file)
index 0000000..bdf4b98
--- /dev/null
+++ b/t/lib/DeprecatedActionsInAppClassTestApp.pm
@@ -0,0 +1,14 @@
+package DeprecatedActionsInAppClassTestApp;
+
+use strict;
+use warnings;
+use Catalyst;
+
+__PACKAGE__->setup;
+
+sub foo : Local {
+    my ($self, $c) = @_;
+    $c->res->body('OK');
+}
+
+1;