From 5062d4c16a67f0b41ea18db39af755cdcca1d57b Mon Sep 17 00:00:00 2001
From: Jelmer Vernooij <jelmer@samba.org>
Date: Tue, 16 Sep 2008 07:22:53 +0200
Subject: Fix more WMI compilation issues.

---
 source4/pidl/lib/Parse/Pidl/ODL.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'source4/pidl/lib/Parse/Pidl')

diff --git a/source4/pidl/lib/Parse/Pidl/ODL.pm b/source4/pidl/lib/Parse/Pidl/ODL.pm
index 5c2cc8bfbf..ad8c76f622 100644
--- a/source4/pidl/lib/Parse/Pidl/ODL.pm
+++ b/source4/pidl/lib/Parse/Pidl/ODL.pm
@@ -37,7 +37,7 @@ sub FunctionAddObjArgs($)
 
 sub ReplaceInterfacePointers($)
 {
-	my $e = shift;
+	my ($e) = @_;
 	foreach my $x (@{$e->{ELEMENTS}}) {
 		next unless (hasType($x->{TYPE}));
 		next unless getType($x->{TYPE})->{DATA}->{TYPE} eq "INTERFACE";
-- 
cgit