diff options
| author | Matthieu Patou <mat@matws.net> | 2013-10-03 09:45:19 -0700 |
|---|---|---|
| committer | Stefan Metzmacher <metze@samba.org> | 2014-10-10 00:32:40 +0200 |
| commit | fa331f64d1a40350496c7acf68c20cb3fead6eaf (patch) | |
| tree | a125ef6460d8a26af25e8fea0a43e7fdf6c477c3 | |
| parent | 5d0d45c9a71f137dc29ca79d49bd558f34bf1ff5 (diff) | |
| download | samba-fa331f64d1a40350496c7acf68c20cb3fead6eaf.tar.gz samba-fa331f64d1a40350496c7acf68c20cb3fead6eaf.tar.xz samba-fa331f64d1a40350496c7acf68c20cb3fead6eaf.zip | |
pidl-wireshark: insure that we have an entire match for the variable name
Signed-off-by: Matthieu Patou <mat@matws.net>
Reviewed-by: Stefan Metzmacher <metze@samba.org>
Autobuild-User(master): Stefan Metzmacher <metze@samba.org>
Autobuild-Date(master): Fri Oct 10 00:32:40 CEST 2014 on sn-devel-104
| -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; |