From 7170cfaaf3b8663ac20be0231baa8ba90e80e5af Mon Sep 17 00:00:00 2001 From: Matthieu Patou Date: Tue, 2 Aug 2011 11:50:32 +0400 Subject: pidl: don't expect to have quote when creating import headers Currently the $_ didn't contains the quote anymore, in order to avoid any further regression the cleanup of quote is done before so that if $_ still have quotes we clean them in anycase. --- pidl/lib/Parse/Pidl/Wireshark/NDR.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'pidl') diff --git a/pidl/lib/Parse/Pidl/Wireshark/NDR.pm b/pidl/lib/Parse/Pidl/Wireshark/NDR.pm index 64b8dcf18c..83fc3cd3bf 100644 --- a/pidl/lib/Parse/Pidl/Wireshark/NDR.pm +++ b/pidl/lib/Parse/Pidl/Wireshark/NDR.pm @@ -770,8 +770,8 @@ sub ProcessImport my @imports = @_; foreach (@imports) { next if($_ eq "security"); - s/\.idl\"$//; s/^\"//; + s/\.idl"?$//; $self->pidl_hdr("#include \"packet-dcerpc-$_\.h\""); } $self->pidl_hdr(""); -- cgit