strip parenthesis on one line

This commit is contained in:
JT Smith 2003-03-15 03:20:47 +00:00
parent 215d552942
commit 3370363c8d

View file

@ -147,8 +147,7 @@ sub process {
next if ($searchString =~ /^\d+$/); # don't process ^0; ^1; ^2; etc.
next if ($searchString =~ /^\-$/); # don't process ^-;
if ($params ne "") {
$params =~ s/^\(//; # remove opening parenthesis
$params =~ s/\)$//; # remove trailing parenthesis
$params =~ s/(^\(|\)$)//g; # remove parenthesis
$params = &process($params); # recursive process params
}
if ($session{config}{macros}{$searchString} ne "") {