[Catalyst-commits] r9764 - in Catalyst-Runtime/5.80/trunk/t/lib/TestApp: Controller View/Dump

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-04-20 19:16:18 +0100 (Mon, 20 Apr 2009)
New Revision: 9764

Removed:
   Catalyst-Runtime/5.80/trunk/t/lib/TestApp/View/Dump/Parameters.pm
Modified:
   Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Dump.pm
Log:
Nuke unused chunk of the TestApp. Also add test case for bug found in DBIC::API


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-20 17:59:52 UTC (rev 9763)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/Controller/Dump.pm	2009-04-20 18:16:18 UTC (rev 9764)
@@ -13,13 +13,10 @@
     $c->forward('TestApp::View::Dump', [\%ENV]);
 }
 
-sub parameters : Action Relative {
-    my ( $self, $c ) = @_;
-    $c->forward('TestApp::View::Dump::Parameters');
-}
-
 sub request : Action Relative {
     my ( $self, $c ) = @_;
+    $c->req->params(undef); # Should be a no-op, and be ignored.
+                            # Back compat test for 5.7
     $c->forward('TestApp::View::Dump::Request');
 }
 

Deleted: Catalyst-Runtime/5.80/trunk/t/lib/TestApp/View/Dump/Parameters.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp/View/Dump/Parameters.pm	2009-04-20 17:59:52 UTC (rev 9763)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp/View/Dump/Parameters.pm	2009-04-20 18:16:18 UTC (rev 9764)
@@ -1,11 +0,0 @@
-package TestApp::View::Dump::Parameters;
-
-use strict;
-use base 'TestApp::View::Dump';
-
-sub process {
-    my ( $self, $c ) = @_;
-    return $self->SUPER::process( $c, $c->req->parameters );
-}
-
-1;