X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FResponse.pm;h=e99cd85cc880b76e1a668c7c56d7b635ec46e5a4;hb=b2ddf6d7e1ea8f9b281ce5da27ecadf3152e151d;hp=8d3d880296c0ae2c68600ec241cc490701e86a94;hpb=70a7eeae0684bf7f55ff59cca58f79c108ce03d5;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Response.pm b/lib/Catalyst/Response.pm index 8d3d880..e99cd85 100644 --- a/lib/Catalyst/Response.pm +++ b/lib/Catalyst/Response.pm @@ -72,15 +72,19 @@ The keys of the hash reference on the right correspond to the L parameters of the same name, except they are used without a leading dash. Possible parameters are: -=head2 value +=over -=head2 expires +=item value -=head2 domain +=item expires -=head2 path +=item domain -=head2 secure +=item path + +=item secure + +=back =head2 $res->header @@ -110,7 +114,7 @@ sub redirect { if (@_) { my $location = shift; - my $status = shift || 301; + my $status = shift || 302; $self->location($location); $self->status($status);