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

removal of dumpSession.

Browse source
This commit is contained in:
Matthew Wilson 2006-01-26 05:39:16 +00:00
parent 7d1dfed519
commit 4a3121960f
199 changed files with 379 additions and 404 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Operation/Admin.pm
View file

@ -32,7 +32,7 @@ If the current user is in the Turn On Admin Group, then return an Admin Console.
=cut
sub www_adminConsole {
my $session = shift; use WebGUI; WebGUI::dumpSession($session);
my $session = shift;
return "" unless ($session->user->isInGroup(12));
my $ac = WebGUI::AdminConsole->new($session);
return $ac->render;
@ -49,7 +49,7 @@ via WebGUI::Session::switchAdminOff()
=cut
sub www_switchOffAdmin {
my $session = shift; use WebGUI; WebGUI::dumpSession($session);
my $session = shift;
return "" unless ($session->user->isInGroup(12));
$session->var->switchAdminOff();
return "";
@ -64,7 +64,7 @@ If the current user is in the Turn On Admin Group, then allow them to turn on Ad
=cut
sub www_switchOnAdmin {
my $session = shift; use WebGUI; WebGUI::dumpSession($session);
my $session = shift;
return "" unless ($session->user->isInGroup(12));
$session->var->switchAdminOn();
return "";