summaryrefslogtreecommitdiff
path: root/source4/pidl/lib/Parse/Pidl/Samba4/Header.pm
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2007-02-21 14:35:25 +0000
committerGerald (Jerry) Carter <jerry@samba.org>2007-10-10 14:48:43 -0500
commit79a1b1a928f0f8cdd6c60d74291bf048c8484f0b (patch)
treee58279ecfbd1d7b14960cb00fc5f08262125259c /source4/pidl/lib/Parse/Pidl/Samba4/Header.pm
parentbf5cfb5f3d7bf315d6869d16fcb061234fef1f92 (diff)
downloadsamba-79a1b1a928f0f8cdd6c60d74291bf048c8484f0b.tar.gz
samba-79a1b1a928f0f8cdd6c60d74291bf048c8484f0b.tar.bz2
samba-79a1b1a928f0f8cdd6c60d74291bf048c8484f0b.zip
r21492: Finish work on nested type support in EJS.
(This used to be commit e88055b76a3d81fcc40773d880f76a1c3f53fbf0)
Diffstat (limited to 'source4/pidl/lib/Parse/Pidl/Samba4/Header.pm')
-rw-r--r--source4/pidl/lib/Parse/Pidl/Samba4/Header.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/source4/pidl/lib/Parse/Pidl/Samba4/Header.pm b/source4/pidl/lib/Parse/Pidl/Samba4/Header.pm
index 39e6c4233c..11ecc17001 100644
--- a/source4/pidl/lib/Parse/Pidl/Samba4/Header.pm
+++ b/source4/pidl/lib/Parse/Pidl/Samba4/Header.pm
@@ -7,7 +7,7 @@
package Parse::Pidl::Samba4::Header;
use strict;
-use Parse::Pidl::Typelist qw(mapTypeName);
+use Parse::Pidl::Typelist qw(mapTypeName scalar_is_reference);
use Parse::Pidl::Util qw(has_property is_constant);
use Parse::Pidl::Samba4 qw(is_intree);
@@ -61,7 +61,7 @@ sub HeaderElement($)
pidl " ";
my $numstar = $element->{POINTERS};
if ($numstar >= 1) {
- $numstar-- if Parse::Pidl::Typelist::scalar_is_reference($element->{TYPE});
+ $numstar-- if (scalar_is_reference($element->{TYPE}));
}
foreach (@{$element->{ARRAY_LEN}})
{