Kludge for bareword handles

Add 'require IO::Handle' at beginning of FileHandle.pm

diff --git a/ext/FileHandle/FileHandle.pm b/ext/FileHandle/FileHandle.pm
index d479dae..ada75a3 100644 (file)
--- a/ext/FileHandle/FileHandle.pm
+++ b/ext/FileHandle/FileHandle.pm
@@ -147,8 +147,7 @@ It will also croak() if accidentally called in a scalar context.
 =head1 SEE ALSO
 
 L<perlfunc>, 
-L<perlop/"I/O Operators">,
-L<POSIX/"FileHandle">
+L<perlop/"I/O Operators">.
 
 =head1 BUGS
 
@@ -169,6 +168,8 @@ require Exporter;
 require DynaLoader;
 @ISA = qw(Exporter DynaLoader);
 
+require IO::Handle;  # Kludge for bareword handles
+
 $VERSION = "1.00" ;
 
 @EXPORT = qw(_IOFBF _IOLBF _IONBF);