Fix derivgen.pl to find exact keys

This commit is contained in:
Jordan Carlin 2024-06-26 07:45:04 -07:00 committed by GitHub
parent f003f8fae9
commit 0da6e35988
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194

View File

@ -96,7 +96,7 @@ foreach my $key (@derivnames) {
my @ent = @{$entry};
my $param = $ent[0];
my $value = $ent[1];
if ($line =~ s/$param\s*=\s*.*;/$param = $value;/) {
if ($line =~ s/\b$param\s*=\s*.*;/$param = $value;/) {
$hit{$param} = 1;
# print("Hit: new line in $config for $param is $line");
}
@ -130,4 +130,4 @@ sub printref {
print join('_', @{$entry}), ', ';
}
print("\n");
}
}