Redirect option added to pages.

This commit is contained in:
JT Smith 2002-08-12 01:19:16 +00:00
parent 7a6372b83f
commit 03f8af0961
5 changed files with 11 additions and 4 deletions

View file

@ -86,6 +86,8 @@ sub page {
} elsif ($wobjectOutput ne "") {
$contentHash{0} = $wobjectOutput;
$content = WebGUI::Template::generate(\%contentHash,1);
} elsif ($session{page}{redirectURL}) {
$session{header}{redirect} = WebGUI::Session::httpRedirect($session{page}{redirectURL})
} else {
if (WebGUI::Privilege::canViewPage()) {
if ($session{var}{adminOn}) {