lots of litlte bug fixes and tweaks

This commit is contained in:
JT Smith 2006-04-20 19:02:11 +00:00
parent 499981d092
commit 1c6fddb206
9 changed files with 25 additions and 0 deletions

View file

@ -51,6 +51,7 @@ via WebGUI::Session::Var::switchAdminOff()
sub www_switchOffAdmin {
my $session = shift;
return "" unless ($session->user->isInGroup(12));
$session->http->setCacheControl("none");
$session->var->switchAdminOff();
return "";
}
@ -66,6 +67,7 @@ If the current user is in the Turn On Admin Group, then allow them to turn on Ad
sub www_switchOnAdmin {
my $session = shift;
return "" unless ($session->user->isInGroup(12));
$session->http->setCacheControl("none");
$session->var->switchAdminOn();
return "";
}