Removed unnessary variables.

This commit is contained in:
JT Smith 2002-06-06 04:33:45 +00:00
parent 1ac2bbd738
commit 31868b00b8

View file

@ -54,7 +54,7 @@ sub _replacement {
#-------------------------------------------------------------------
sub process {
my ($output,@data, $pageTitle, $parentId, $sth, $first, $temp);
my ($output);
$output = $_[0];
$output =~ s/\^s\((.*?)\)\;/_replacement($1)/ge;
return $output;