projects
/
catagits/Catalyst-Runtime.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Fixed forward to classes
[catagits/Catalyst-Runtime.git]
/
t
/
lib
/
TestApp.pm
diff --git
a/t/lib/TestApp.pm
b/t/lib/TestApp.pm
index
594dfa3
..
8630a98
100644
(file)
--- a/
t/lib/TestApp.pm
+++ b/
t/lib/TestApp.pm
@@
-50,6
+50,11
@@
sub execute {
return $c->SUPER::execute(@_);
}
+sub class_forward_test_method {
+ my ( $self, $c ) = @_;
+ $c->response->headers->header( 'X-Class-Forward-Test-Method' => 1 );
+}
+
{
no warnings 'redefine';
sub Catalyst::Log::error { }