1 package Catalyst::Context;
5 has action => (is => 'rw');
6 has counter => (is => 'rw', default => sub { {} });
7 has namespace => (is => 'rw');
8 has request_class => (is => 'ro', default => 'Catalyst::Request');
9 has request => (is => 'rw', default => sub { $_[0]->request_class->new({}) }, required => 1, lazy => 1);
10 has response_class => (is => 'ro', default => 'Catalyst::Response');
11 has response => (is => 'rw', default => sub { $_[0]->response_class->new({}) }, required => 1, lazy => 1);
12 has stack => (is => 'ro', default => sub { [] });
13 has stash => (is => 'rw', default => sub { {} });
14 has state => (is => 'rw', default => 0);
15 has stats => (is => 'rw');
19 __PACKAGE__->meta->make_immutable;
27 Catalyst::Context - object for keeping request related state
55 L<Catalyst>, L<Catalyst::Model>, L<Catalyst::View>, L<Catalyst::Controller>.
59 Catalyst Contributors, see Catalyst.pm
63 This library is free software. You can redistribute it and/or modify it under
64 the same terms as Perl itself.