fix perl warning

This commit is contained in:
Michele Guerini Rocco 2019-05-15 23:48:50 +02:00
parent 500d901afe
commit 7902d1b5ff
Signed by: rnhmjoj
GPG Key ID: 91BE884FBA4B591A

View File

@ -89,7 +89,7 @@ sub DoPrepass
return "" if /^###/;
s/\s*###.*//; # Strip comments
s/\${(\w+)}/&VarSubst($1, $skipFlag)/eg; # Do variable substitutions
s/\$\{(\w+)}/&VarSubst($1, $skipFlag)/eg; # Do variable substitutions
$_;
}