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

A little code cleanup.

Browse source
This commit is contained in:
JT Smith 2002-11-02 20:22:49 +00:00
parent 9aa26fa221
commit ae970b61d8
1 changed files with 3 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib/WebGUI/Macro/Env.pm
View file

@ -16,15 +16,14 @@ use WebGUI::Session;
#------------------------------------------------------------------- #-------------------------------------------------------------------
sub _replacement { sub _replacement {
my (@param, $temp); my (@param);
@param = WebGUI::Macro::getParams($_[0]); @param = WebGUI::Macro::getParams($_[0]);
$temp = $session{env}{$param[0]}; return $session{env}{$param[0]};
return $temp;
} }
#------------------------------------------------------------------- #-------------------------------------------------------------------
sub process { sub process {
my ($output, $temp); my ($output);
$output = $_[0]; $output = $_[0];
$output =~ s/\^Env\((.*?)\)\;/_replacement($1)/ge; $output =~ s/\^Env\((.*?)\)\;/_replacement($1)/ge;
return $output; return $output;