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

fixed version tag problem. changed admin toggle

Browse source
This commit is contained in:
Doug Bell 2010-05-07 13:03:05 -05:00
parent ea1a020ab5
commit 5c2581850f
6 changed files with 30 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/WebGUI/Macro/AdminToggle.pm
View file

@ -48,16 +48,15 @@ sub process {
my $session = shift;
return ""
unless $session->user->canUseAdminMode;
my ($turnOn, $turnOff, $templateName) = @_;
my ($turnOn, $templateName) = @_;
my $i18n = WebGUI::International->new($session,'Macro_AdminToggle');
my %var;
$var{'toggle.text'} = $turnOn || $i18n->get(516);
if ($session->var->isAdminOn) {
$var{'toggle.url'} = $session->url->page('op=switchOffAdmin');
$var{'toggle.text'} = $turnOff || $i18n->get(517);
$var{'toggle.url'} = '#'
}
else {
$var{'toggle.url'} = $session->url->page('op=switchOnAdmin');
$var{'toggle.text'} = $turnOn || $i18n->get(516);
$var{'toggle.url'} = $session->url->page('op=admin');
}
my $template = $templateName ? WebGUI::Asset::Template->newByUrl($session, $templateName)
: WebGUI::Asset::Template->newById($session, "PBtmpl0000000000000036");