Remove use of overload
[catagits/Catalyst-Runtime.git] / t / lib / TestApp.pm
index f18228c..a46ecb1 100644 (file)
@@ -29,7 +29,7 @@ sub global_action : Private {
 sub execute {
     my $c      = shift;
     my $class  = ref( $c->component( $_[0] ) ) || $_[0];
-    my $action = "$_[1]";
+    my $action = $_[1]->reverse;
 
     my $method;
 
@@ -98,4 +98,4 @@ use strict;
 
 use base qw/Catalyst::Base Class::Data::Inheritable/;
 
-1;
\ No newline at end of file
+1;