- Fixed a macro processing problem on the Redirect asset.
- Added a log info entry when a redirect occurs.
This commit is contained in:
parent
e6aafa2f7f
commit
af84fb43af
3 changed files with 8 additions and 4 deletions
|
|
@ -367,6 +367,7 @@ sub setRedirect {
|
|||
my $url = shift;
|
||||
my @params = $self->session->form->param;
|
||||
return undef if ($url eq $self->session->url->page() && scalar(@params) < 1); # prevent redirecting to self
|
||||
$self->session->errorHandler->info("Redirecting to $url");
|
||||
$self->{_http}{location} = $url;
|
||||
$self->setStatus("302", "Redirect");
|
||||
$self->session->style->setMeta({"http-equiv"=>"refresh",content=>"0; URL=".$url});
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue