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

various miscellaneous stuff

Browse source
This commit is contained in:
JT Smith 2004-11-30 16:46:55 +00:00
parent 22039cb312
commit 00074fd16d
21 changed files with 14 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -14,8 +14,13 @@ package WebGUI::Asset::Redirect;
=cut
use strict;
use WebGUI::Asset;
use WebGUI::HTTP;
use WebGUI::Session;
our @ISA = qw(WebGUI::Asset);
=head1 NAME
@ -124,9 +129,9 @@ sub www_view {
my $self = shift;
if ($session{var}{adminOn}) {
return $self->www_edit;
} else {
}
WebGUI::HTTP::setRedirect($self->get("redirectUrl"));
return "";
}