X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FRequest.pm;h=66112554305ab8ffb663b1d488661202e7dbb123;hb=822fe9544767709e6d75eda2b0cbcfb46bb494dd;hp=fe05db7ea12dfeee914b679adbb968765cd73595;hpb=3ad654e0c538876403f3e664f0d9f302ef470770;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Request.pm b/lib/Catalyst/Request.pm index fe05db7..6611255 100644 --- a/lib/Catalyst/Request.pm +++ b/lib/Catalyst/Request.pm @@ -38,6 +38,7 @@ Catalyst::Request - Catalyst Request Class $req->content_encoding; $req->content_length; $req->content_type; + $req->cookie; $req->cookies; $req->header; $req->headers; @@ -130,18 +131,18 @@ sub cookie { my $self = shift; if ( @_ == 0 ) { - return keys %{ $self->cookie }; + return keys %{ $self->cookies }; } if ( @_ == 1 ) { my $name = shift; - unless ( exists $self->cookie->{$name} ) { + unless ( exists $self->cookies->{$name} ) { return undef; } - return $self->cookie->{$name}; + return $self->cookies->{$name}; } } @@ -264,7 +265,7 @@ Shortcut for $req->parameters. =item $req->parameters Returns a reference to a hash containing parameters. Values can -be either a scalar or a arrayref containing scalars. +be either a scalar or an arrayref containing scalars. print $c->request->parameters->{field}; print $c->request->parameters->{field}->[0];