Author: tpot
Date: 2004-08-14 01:26:11 +0000 (Sat, 14 Aug 2004)
New Revision: 1815
WebSVN: http://websvn.samba.org/websvn/changeset.php?rep=samba&path=/&rev=1815&nolog=1
Log:
Update parser for recent changes to perl parser.

Modified:
   branches/SAMBA_4_0/source/build/pidl/eparser.pm

Changeset:
Modified: branches/SAMBA_4_0/source/build/pidl/eparser.pm
===================================================================
--- branches/SAMBA_4_0/source/build/pidl/eparser.pm     2004-08-14 01:11:34 UTC (rev 
1814)
+++ branches/SAMBA_4_0/source/build/pidl/eparser.pm     2004-08-14 01:26:11 UTC (rev 
1815)
@@ -986,9 +986,8 @@
 
        foreach my $x (@{$idl}) {
 
-           ($x->{TYPE} eq "MODULEHEADER") && ModuleHeader($x);
-               
            if ($x->{TYPE} eq "INTERFACE") { 
+               ModuleHeader($x);
                $module = $x->{NAME};
                BuildNeeded($x);
            }

Reply via email to