diff options
Diffstat (limited to 'source4/build/pidl/Parse/Pidl/IDL.pm')
-rw-r--r-- | source4/build/pidl/Parse/Pidl/IDL.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/source4/build/pidl/Parse/Pidl/IDL.pm b/source4/build/pidl/Parse/Pidl/IDL.pm index d0143632e0..7f7e5bcdca 100644 --- a/source4/build/pidl/Parse/Pidl/IDL.pm +++ b/source4/build/pidl/Parse/Pidl/IDL.pm @@ -2535,8 +2535,7 @@ sub _Lexer($) { my($parser)=shift; - $parser->YYData->{INPUT} - or return('',undef); + $parser->YYData->{INPUT} or return('',undef); again: $parser->YYData->{INPUT} =~ s/^[ \t]*//; @@ -2587,8 +2586,7 @@ again: sub parse_idl($$) { - my $self = shift; - my $filename = shift; + my ($self,$filename) = @_; my $saved_delim = $/; undef $/; |