# This file documents the revision history for Perl extension Catalyst.
+5.8000
+ - Port to Moose
+ - Added test for action stringify
+
5.7013
- Fix subdirs for scripts that run in subdirs more than one level deep.
- Added test and updated docs for handling the Authorization header
no Moose;
+use overload (
+
+ # Stringify to reverse for debug output etc.
+ q{""} => sub { shift->{reverse} },
+
+ # Codulate to execute to invoke the encapsulated action coderef
+ '&{}' => sub { my $self = shift; sub { $self->execute(@_); }; },
+
+ # Make general $stuff still work
+ fallback => 1,
+
+);
+
+
+
no warnings 'recursion';
#__PACKAGE__->mk_accessors(qw/class namespace reverse attributes name code/);
use Test::More;
-plan tests => 3;
+plan tests => 4;
use_ok('TestApp');
is(TestApp->controller('Args')->action_for('args')->code,
TestApp::Controller::Args->can('args'),
'action_for on controller ok');
+ is(TestApp->controller('Args')->action_for('args').'',
+ 'args/args',
+ 'action stringifies');