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

various patches

Browse source
This commit is contained in:
JT Smith 2004-07-13 17:11:06 +00:00
parent c0bf7e46f0
commit ff110de45c
5 changed files with 37 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -18,10 +18,13 @@ use WebGUI::Session;
#-------------------------------------------------------------------
sub process {
my (@param, $temp);
@param = WebGUI::Macro::getParams($_[0]);
my @param = WebGUI::Macro::getParams($_[0]);
if (my $collateral = WebGUI::Collateral->find($param[0])) {
return $collateral->get("parameters");
my $temp = $collateral->get("parameters");
for my $i ( 1 .. $#param ) {
$temp =~ s/\^$i\;/$param[$i]/g;
}
return $temp;
} else {
return undef;
}