Update Redirect navigation to show how it really works.
Localize self-referential redirect URL message. Beginning of EMS master documentation.
This commit is contained in:
parent
edc7e24d87
commit
2d90644e1c
3 changed files with 24 additions and 6 deletions
|
|
@ -119,8 +119,8 @@ A web executable method that redirects the user to the specified page, or displa
|
|||
sub www_view {
|
||||
my $self = shift;
|
||||
return $self->session->privilege->noAccess() unless $self->canView;
|
||||
my $i18n = WebGUI::International->new($self->session, "Asset_Redirect");
|
||||
if ($self->session->var->isAdminOn() && $self->canEdit) {
|
||||
my $i18n = WebGUI::International->new($self->session, "Asset_Redirect");
|
||||
return $self->getAdminConsole->render($i18n->get("what do you want to do with this redirect").'
|
||||
<ul>
|
||||
<li><a href="'.$self->get("redirectUrl").'">'.$i18n->get("go to the redirect url").'</a></li>
|
||||
|
|
@ -131,7 +131,7 @@ sub www_view {
|
|||
my $url = $self->get("redirectUrl");
|
||||
WebGUI::Macro::process(\$url);
|
||||
$self->session->http->setRedirect($url) unless $self->get("redirectUrl") eq $self->get("url");
|
||||
return "Redirect is self-referential";
|
||||
return $i18n->get('self_referential');
|
||||
}
|
||||
|
||||
1;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue