From 1cfda1af18db8aee6d4d3031f2056d80f4afe75b Mon Sep 17 00:00:00 2001
From: Jelmer Vernooij <jelmer@samba.org>
Date: Thu, 29 Dec 2005 16:03:03 +0000
Subject: r12572: No longer parse coclasses as interfaces (This used to be
 commit f75f757b621a46ea531c27ac682623829a4fdea7)

---
 source4/pidl/lib/Parse/Pidl/NDR.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/source4/pidl/lib/Parse/Pidl/NDR.pm b/source4/pidl/lib/Parse/Pidl/NDR.pm
index 0dd1ab4dd2..179d2ecb12 100644
--- a/source4/pidl/lib/Parse/Pidl/NDR.pm
+++ b/source4/pidl/lib/Parse/Pidl/NDR.pm
@@ -642,7 +642,9 @@ sub Parse($)
 	
 	my @ndr = ();
 
-	push(@ndr, ParseInterface($_)) foreach (@{$idl});
+	foreach (@{$idl}) {
+		($_->{TYPE} eq "INTERFACE") && push(@ndr, ParseInterface($_));
+	}
 
 	return \@ndr;
 }
-- 
cgit