[Catalyst-commits] r9683 - in Catalyst-Runtime/5.80/trunk/t/lib: .
Catalyst/Plugin/Test TestApp/Controller
TestApp/Controller/Engine/Request TestApp/Controller/Engine/Response
TestApp/Controller/Priorities TestAppOnDemand/Controller
t0m at dev.catalyst.perl.org
t0m at dev.catalyst.perl.org
Sun Apr 12 18:08:07 GMT 2009
Author: t0m
Date: 2009-04-12 19:08:06 +0100 (Sun, 12 Apr 2009)
New Revision: 9683
Modified:
Catalyst-Runtime/5.80/trunk/t/lib/Catalyst/Plugin/Test/Deprecated.pm
Catalyst-Runtime/5.80/trunk/t/lib/Catalyst/Plugin/Test/Plugin.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Args.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Dump.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Request/URI.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Request/Uploads.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Cookies.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Errors.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Headers.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Large.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Print.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Redirect.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Status.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Index.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/loc_vs_index.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/locre_vs_index.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/path_vs_index.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/re_vs_index.pm
Catalyst-Runtime/5.80/trunk/t/lib/TestAppOnDemand/Controller/Body.pm
Log:
Remove use of Catalyst::Base from the tests
Modified: Catalyst-Runtime/5.80/trunk/t/lib/Catalyst/Plugin/Test/Deprecated.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/Catalyst/Plugin/Test/Deprecated.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/Catalyst/Plugin/Test/Deprecated.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -4,8 +4,6 @@
use warnings;
use NEXT;
-use base qw/Catalyst::Base/;
-
sub prepare {
my $class = shift;
# Note: This use of NEXT is deliberately left here (without a use NEXT)
Modified: Catalyst-Runtime/5.80/trunk/t/lib/Catalyst/Plugin/Test/Plugin.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/Catalyst/Plugin/Test/Plugin.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/Catalyst/Plugin/Test/Plugin.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -4,7 +4,7 @@
use warnings;
use MRO::Compat;
-use base qw/Catalyst::Base Class::Data::Inheritable/;
+use base qw/Catalyst::Controller Class::Data::Inheritable/;
__PACKAGE__->mk_classdata('ran_setup');
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Args.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Args.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Args.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Args;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub args :Local {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Dump.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Dump.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Dump.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Dump;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub default : Action Private {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Request/URI.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Request/URI.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Request/URI.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Engine::Request::URI;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub default : Private {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Request/Uploads.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Request/Uploads.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Request/Uploads.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Engine::Request::Uploads;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub slurp : Relative {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Cookies.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Cookies.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Cookies.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Engine::Response::Cookies;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub one : Local {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Errors.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Errors.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Errors.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Engine::Response::Errors;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub one : Relative {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Headers.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Headers.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Headers.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Engine::Response::Headers;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub one : Relative {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Large.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Large.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Large.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Engine::Response::Large;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub one : Relative {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Print.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Print.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Print.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Engine::Response::Print;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub one :Relative {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Redirect.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Redirect.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Redirect.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Engine::Response::Redirect;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub one : Relative {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Status.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Status.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Engine/Response/Status.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Engine::Response::Status;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub begin : Private {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Index.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Index.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Index.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Index;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub index : Private {
my ( $self, $c ) = @_;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/loc_vs_index.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/loc_vs_index.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/loc_vs_index.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Priorities::loc_vs_index;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub index :Private { $_[1]->res->body( 'index' ) }
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/locre_vs_index.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/locre_vs_index.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/locre_vs_index.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Priorities::locre_vs_index;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub index :Private { $_[1]->res->body( 'index' ) }
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/path_vs_index.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/path_vs_index.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/path_vs_index.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Priorities::path_vs_index;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub index :Private { $_[1]->res->body( 'index' ) }
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/re_vs_index.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/re_vs_index.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities/re_vs_index.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Priorities::re_vs_index;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
sub index :Private { $_[1]->res->body( 'index' ) }
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Priorities.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestApp::Controller::Priorities;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
#
# Regex vs. Local
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -97,6 +97,6 @@
use strict;
-use base qw/Catalyst::Base Class::Data::Inheritable/;
+use base qw/Class::Data::Inheritable/;
1;
Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestAppOnDemand/Controller/Body.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestAppOnDemand/Controller/Body.pm 2009-04-12 17:39:08 UTC (rev 9682)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestAppOnDemand/Controller/Body.pm 2009-04-12 18:08:06 UTC (rev 9683)
@@ -1,7 +1,7 @@
package TestAppOnDemand::Controller::Body;
use strict;
-use base 'Catalyst::Base';
+use base 'Catalyst::Controller';
use Data::Dump ();
@@ -26,4 +26,4 @@
$c->res->body( join ( '|', map { length $_ } @chunks ) );
}
-1;
\ No newline at end of file
+1;
More information about the Catalyst-commits
mailing list