svn commit: samba r24407 - in branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl: .

[metze]

Author: metze
Date: 2007-08-14 11:50:45 +0000 (Tue, 14 Aug 2007)
New Revision: 24407

WebSVN: 
http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=24407

Log:
$element->{ARRAY_LEN} doesn't exist...

and a few lines above we use $element->{ORIGINAL}->{ARRAY_LEN}
I assume it was just forgotten in the update.

metze
Modified:
   branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4.pm


Changeset:
Modified: branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4.pm
===================================================================
--- branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4.pm     2007-08-14 
10:47:47 UTC (rev 24406)
+++ branches/SAMBA_4_0/source/pidl/lib/Parse/Pidl/Samba4.pm     2007-08-14 
11:50:45 UTC (rev 24407)
@@ -62,7 +62,7 @@
                $ret.="*" foreach (1..$numstar);
        }
        $ret.=$element->{NAME};
-       foreach (@{$element->{ARRAY_LEN}}) {
+       foreach (@{$element->{ORIGINAL}->{ARRAY_LEN}}) {
                next unless (is_constant($_) and not has_property($element, 
"charset"));
                $ret.="[$_]";
        }