pidl:Samba3/ClientNDR: ignore "todo" functions

metze

diff --git a/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm b/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm
index 17384241c90cf57c146390484fb7d5ec9435f3ca..cb6c1f252a315df1e26a8c36d245488dc6636963 100644 (file)
--- a/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm
+++ b/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm
@@ -495,9 +495,10 @@ sub ParseInterface($$)
 
        $self->pidl_hdr("#ifndef __CLI_$uif\__");
        $self->pidl_hdr("#define __CLI_$uif\__");
-       foreach (@{$if->{FUNCTIONS}}) {
-               next if ($_->{PROPERTIES}{noopnum});
-               $self->ParseFunction($if->{NAME}, $_);
+       foreach my $fn (@{$if->{FUNCTIONS}}) {
+               next if has_property($fn, "noopnum");
+               next if has_property($fn, "todo");
+               $self->ParseFunction($if->{NAME}, $fn);
        }
        $self->pidl_hdr("#endif /* __CLI_$uif\__ */");
 }