git.samba.org
/
obnox
/
samba
/
samba-obnox.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
pidl: Recent Perl warns about "defined(@var)" constructs.
[obnox/samba/samba-obnox.git]
/
pidl
/
lib
/
Parse
/
Pidl
/
ODL.pm
diff --git
a/pidl/lib/Parse/Pidl/ODL.pm
b/pidl/lib/Parse/Pidl/ODL.pm
index 74d9ac7c04d9642c7e2d5138e2b8a125963439b8..14e77fa93f249b6039d459bed4261b358695ded7 100644
(file)
--- a/
pidl/lib/Parse/Pidl/ODL.pm
+++ b/
pidl/lib/Parse/Pidl/ODL.pm
@@
-70,7
+70,7
@@
sub ODL2IDL
next;
}
my $podl = Parse::Pidl::IDL::parse_file($idl_path, $opt_incdirs);
- if (defined(
@
$podl)) {
+ if (defined($podl)) {
require Parse::Pidl::Typelist;
my $basename = basename($idl_path, ".idl");