summaryrefslogtreecommitdiff
path: root/fml/lib/IO/Adapter/Array.pm
diff options
context:
space:
mode:
authorfukachan <fukachan>2001-03-18 08:07:43 +0000
committerfukachan <fukachan>2001-03-18 08:07:43 +0000
commit17c66d690949a1e38027189258a0b3d08f1767ac (patch)
tree7eb7baae6331658315d17510cb2411abf1149ebc /fml/lib/IO/Adapter/Array.pm
parentfbd7cf87af76ee575c062dc6326a5fb2cdabdf5f (diff)
downloadfml8-17c66d690949a1e38027189258a0b3d08f1767ac.tar.gz
fml8-17c66d690949a1e38027189258a0b3d08f1767ac.tar.bz2
fml8-17c66d690949a1e38027189258a0b3d08f1767ac.zip
nuke defined() to avoid perl warning
Diffstat (limited to 'fml/lib/IO/Adapter/Array.pm')
-rw-r--r--fml/lib/IO/Adapter/Array.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/fml/lib/IO/Adapter/Array.pm b/fml/lib/IO/Adapter/Array.pm
index 6e27038d..acc60775 100644
--- a/fml/lib/IO/Adapter/Array.pm
+++ b/fml/lib/IO/Adapter/Array.pm
@@ -93,7 +93,7 @@ sub open
$self->{_elements} = $r_array;
$self->{_num_elements} = $#elements;
$self->{_counter} = 0;
- return defined @elements ? \@elements : undef;
+ return( @elements ? \@elements : undef );
}