Commit | Line | Data |
---|---|---|
07b00970 | 1 | package RestTest::Controller::API::REST::StashedClass; |
2 | use Moose; | |
3 | BEGIN { extends 'Catalyst::Controller::DBIC::API::REST' } | |
4 | ||
5 | use namespace::autoclean; | |
6 | ||
7 | sub setup :Chained('/api/rest/rest_base') :CaptureArgs(1) :PathPart('stashedclass') { | |
8 | my ($self, $c, $class) = @_; | |
3649b790 | 9 | |
10 | $c->stash->{class} = $class if $class ne 'noclass'; | |
11 | ||
07b00970 | 12 | $self->next::method($c); |
13 | } | |
14 | ||
15 | 1; |