oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix bugs revealed by Test::Class tests

Browse source
This commit is contained in:
Doug Bell 2011-06-02 19:44:06 -05:00
parent 1de9a12365
commit 664e7686c6
16 changed files with 93 additions and 75 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Asset/Redirect.pm
View file

@ -122,12 +122,14 @@ sub www_view {
my $url = $self->redirectUrl;
WebGUI::Macro::process($self->session, \$url);
if ($self->session->isAdminOn() && $self->canEdit) {
return $self->getAdminConsole->render($i18n->get("what do you want to do with this redirect").'
return '<h1>' . $i18n->get('assetName') . '</h1>'
. $i18n->get("what do you want to do with this redirect").'
<ul>
<li><a href="'.$url.'">'.$i18n->get("go to the redirect url").'</a></li>
<li><a href="'.$self->getUrl("func=edit").'">'.$i18n->get("edit the redirect properties").'</a></li>
<li><a href="'.$self->getParent->getUrl.'">'.$i18n->get("go to the redirect parent page").'</a></li>
</ul>',$i18n->get("assetName"));
</ul>'
;
}
unless ($url eq $self->url) {
$self->session->response->setRedirect($url,$self->redirectType);