Commit | Line | Data |
---|---|---|
30726632 | 1 | package Catalyst::View::Component::SubInclude::SubRequest; |
2 | use warnings; | |
3 | use strict; | |
4 | ||
5 | sub generate_subinclude { | |
6 | my ($class, $c, $path, $params) = @_; | |
7 | my $stash = {}; | |
8 | ||
9 | croak "subincludes through subrequests require Catalyst::Plugin::SubRequest" | |
10 | unless $c->can('sub_request'); | |
11 | ||
12 | $c->sub_request( $path, $stash, $params ); | |
13 | } | |
14 | ||
15 | 1; |