X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FResponse.pm;h=8d3d880296c0ae2c68600ec241cc490701e86a94;hp=8aa9b22fd43d4edeba07d289487702cb14f8466c;hb=70a7eeae0684bf7f55ff59cca58f79c108ce03d5;hpb=e70a5d36d23dfb32ea5700001335dc4c1d44bd37 diff --git a/lib/Catalyst/Response.pm b/lib/Catalyst/Response.pm index 8aa9b22..8d3d880 100644 --- a/lib/Catalyst/Response.pm +++ b/lib/Catalyst/Response.pm @@ -110,7 +110,7 @@ sub redirect { if (@_) { my $location = shift; - my $status = shift || 302; + my $status = shift || 301; $self->location($location); $self->status($status);