Switched macro to use new nesting mechanism.
This commit is contained in:
parent
85cdb5bd0c
commit
147aac791a
51 changed files with 133 additions and 435 deletions
|
|
@ -17,20 +17,13 @@ use WebGUI::Session;
|
|||
use WebGUI::SQL;
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
sub _replacement {
|
||||
sub process {
|
||||
my (@param, $temp);
|
||||
@param = WebGUI::Macro::getParams($_[0]);
|
||||
($temp) = WebGUI::SQL->quickArray("select parameters from collateral where name=".quote($param[0]));
|
||||
return WebGUI::Macro::process($temp);
|
||||
}
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
sub process {
|
||||
my ($output, $temp);
|
||||
$output = $_[0];
|
||||
$output =~ s/\^Snippet\((.*?)\)\;/_replacement($1)/ge;
|
||||
return $output;
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue