diff options
-rw-r--r-- | lib/Hal/Cdroms.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/Hal/Cdroms.pm b/lib/Hal/Cdroms.pm index a4e0b65..aac8d72 100644 --- a/lib/Hal/Cdroms.pm +++ b/lib/Hal/Cdroms.pm @@ -275,6 +275,13 @@ sub _reactor_wait { $found_val; } +=head2 member(SCALAR, LIST) + +is the value in the list? + +=cut + +# From MDK::Common::DataStructure : sub member { my $e = shift; foreach (@_) { $e eq $_ and return 1 } 0 } =head1 AUTHOR |