diff options
| -rw-r--r-- | pidl/lib/Parse/Pidl/Wireshark/NDR.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pidl/lib/Parse/Pidl/Wireshark/NDR.pm b/pidl/lib/Parse/Pidl/Wireshark/NDR.pm index aa434d8ad1..10eaa6c95e 100644 --- a/pidl/lib/Parse/Pidl/Wireshark/NDR.pm +++ b/pidl/lib/Parse/Pidl/Wireshark/NDR.pm @@ -624,7 +624,7 @@ sub Struct($$$$) my $switch_info = undef; my $v = $_->{NAME}; - if (scalar(grep {/$v/} keys(%$varswitchs)) == 1) { + if (scalar(grep {/^$v$/} keys(%$varswitchs)) == 1) { # This element is one of the switch attribute my $switch_dt = getType($_->{TYPE}); my $switch_type; |