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

Switched macro to use new nesting mechanism.

Browse source
This commit is contained in:
JT Smith 2003-02-28 05:25:18 +00:00
parent 85cdb5bd0c
commit 147aac791a
51 changed files with 133 additions and 435 deletions
Download patch file Download diff file Expand all files Collapse all files

19
lib/WebGUI/Macro/AdminText.pm
View file

@ -15,23 +15,12 @@ use WebGUI::Macro;
use WebGUI::Session;
#-------------------------------------------------------------------
sub _replacement {
my ($temp,@param);
@param = WebGUI::Macro::getParams(shift);
if ($session{var}{adminOn}) {
$temp = $param[0];
} else {
$temp = "";
}
return $temp;
sub process {
my @param = WebGUI::Macro::getParams(shift);
return "" unless ($session{var}{adminOn});
return $param[0];
}
#-------------------------------------------------------------------
sub process {
my ($output) = @_;
$output =~ s/\^AdminText\((.*?)\)\;/_replacement($1)/ge;
return $output;
}
1;