|
@@ -115,7 +115,7 @@ sub parse {
|
|
|
if (open(SV, "<", $varlistfile)) {
|
|
if (open(SV, "<", $varlistfile)) {
|
|
|
binmode(SV);
|
|
binmode(SV);
|
|
|
while (<SV>) {
|
|
while (<SV>) {
|
|
|
- next if m/^\#/ || !m/\S/;
|
|
|
|
|
|
|
+ next if m/^\s*\#/ || !m/\S/;
|
|
|
s/\s*\n$//;
|
|
s/\s*\n$//;
|
|
|
m/^(\w[-:0-9A-Za-z]*)\=/ ||
|
|
m/^(\w[-:0-9A-Za-z]*)\=/ ||
|
|
|
error(_g("bad line in substvars file %s at line %d"),
|
|
error(_g("bad line in substvars file %s at line %d"),
|