Merge branch 'master' of ssh://git.shadowcat.co.uk/Catalyst-Controller-MovableType

[catagits/Catalyst-Controller-MovableType.git] / t / lib / script / testapp_server.pl

diff --git a/t/lib/script/testapp_server.pl b/t/lib/script/testapp_server.pl
new file mode 100644 (file)
index 0000000..b42c26f
--- /dev/null
+++ b/t/lib/script/testapp_server.pl
@@ -0,0 +1,10 @@
+#!/usr/bin/env perl
+
+BEGIN {
+    $ENV{CATALYST_SCRIPT_GEN} = 40;
+}
+
+use Catalyst::ScriptRunner;
+Catalyst::ScriptRunner->run('TestApp', 'Server');
+
+1;