Changeset 275 for trunk/lib/Epoll.pm
- Timestamp:
- 12/16/09 11:04:36 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/lib/Epoll.pm
r259 r275 22 22 Session::State::Cookie 23 23 Prototype 24 I18N 24 25 /; 25 26 … … 58 59 __PACKAGE__->config->{session}{dbi_dsn} = 'dbi:Pg:' . __PACKAGE__->config->{db}; 59 60 61 sub begin : Private { 62 my ( $self, $c ) = @_; 63 64 my $locale = $c->request->param('locale'); 65 66 $c->loc('foo bar'); 67 68 $c->response->headers->push_header( 'Vary' => 'Accept-Language' ); # hmm vary and param? 69 $c->languages( $locale ? [ $locale ] : undef 70 ); 71 } 60 72 61 73 =head1 NAME
Note: See TracChangeset
for help on using the changeset viewer.