Fix a syntax error which causes a compile error
(altho not in my version Cygwin Perl V5.14 for some reason). svn path=/trunk/; revision=47584
This commit is contained in:
parent
4c41fd5df9
commit
7b40629a16
|
@ -539,7 +539,7 @@ sub remove_hf_pid_from_unused_if_add_oui_call {
|
|||
return;
|
||||
}
|
||||
|
||||
my @hfvars = grep { m/ ^ hf_ [a-zA-Z0-9_]+ _pid $ /xmso} keys $unUsedHRef;
|
||||
my @hfvars = grep { m/ ^ hf_ [a-zA-Z0-9_]+ _pid $ /xmso} keys %$unUsedHRef;
|
||||
|
||||
if ((@hfvars == 0) || (@hfvars > 1)) {
|
||||
return; # if multiple unused hf_..._pid
|
||||
|
|
Loading…
Reference in New Issue