[Catalyst-commits] r10650 - Catalyst-Runtime/5.80/branches/better_scripts/t/TestApp/script

[dhoss at dev.catalyst.perl.org]

Author: dhoss
Date: 2009-06-25 01:21:18 +0000 (Thu, 25 Jun 2009)
New Revision: 10650

Modified:
   Catalyst-Runtime/5.80/branches/better_scripts/t/TestApp/script/testapp_server.pl
Log:
fixed test server, blech


Modified: Catalyst-Runtime/5.80/branches/better_scripts/t/TestApp/script/testapp_server.pl
===================================================================
--- Catalyst-Runtime/5.80/branches/better_scripts/t/TestApp/script/testapp_server.pl	2009-06-25 01:10:57 UTC (rev 10649)
+++ Catalyst-Runtime/5.80/branches/better_scripts/t/TestApp/script/testapp_server.pl	2009-06-25 01:21:18 UTC (rev 10650)
@@ -1,7 +1,7 @@
-package testapp::Script::Server;
+package TestApp::Script::Server;
 
 use Catalyst::Engine::HTTP;
-use testapp;
+use TestApp;
 use Moose;
 
 with 'MooseX::GetOpt';
@@ -12,7 +12,7 @@
 
 sub run {
     my $self = shift;
-    testapp->run(
+    TestApp->run(
         $port, $host,
         {
             argv       => $self->argv,