diff options
Diffstat (limited to 'source4/pidl/lib/Parse/Pidl/Ethereal')
| -rw-r--r-- | source4/pidl/lib/Parse/Pidl/Ethereal/Conformance.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/source4/pidl/lib/Parse/Pidl/Ethereal/Conformance.pm b/source4/pidl/lib/Parse/Pidl/Ethereal/Conformance.pm index d0a3047939..7ba6af3815 100644 --- a/source4/pidl/lib/Parse/Pidl/Ethereal/Conformance.pm +++ b/source4/pidl/lib/Parse/Pidl/Ethereal/Conformance.pm @@ -147,11 +147,12 @@ sub ReadConformance($$) next; } - my @fields = split(/ /); + my @fields = split(/([^ ]+|"[^"]+")/); - my $cmd = $fields[0]; + my $cmd = $fields[1]; shift @fields; + shift @fields; if (not defined($field_handlers{$cmd})) { print "$f:$ln: Warning: Unknown command `$cmd'\n"; |