Commit 5e1a0a3d authored by Russ Fish's avatar Russ Fish
Browse files

Nomatch case while generating defs-elabinelab ate the following defn.

parent afed1e74
......@@ -1426,6 +1426,7 @@ sub CreateDefsFile($)
while (<INDEFS>) {
my $key;
my $val;
my $line = $_; # In case the switch doesn't match.
if ($_ =~ /^([-\w]*)="(.+)"$/ ||
$_ =~ /^([-\w]*)=(.+)$/) {
......@@ -1620,7 +1621,7 @@ sub CreateDefsFile($)
last SWITCH;
};
print OUTDEFS $_;
print OUTDEFS $line;
}
}
else {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment