X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FPod%2FConstants.pm;h=80c2eab0fee8ada6d2883caf25f5b1fae395d103;hb=94e0b31b04205bddac4ea3ffbf55a948d0148661;hp=3e24fea847f0afe4b580adcccfe7c405f828e27e;hpb=612aada29b8037a7040ecabd2ed8f3afa4402d49;p=pod-constants.git

diff --git a/lib/Pod/Constants.pm b/lib/Pod/Constants.pm
index 3e24fea..80c2eab 100644
--- a/lib/Pod/Constants.pm
+++ b/lib/Pod/Constants.pm
@@ -130,8 +130,6 @@ sub import {
 	goto \&import_from_file;
 }
 
-use IO::Handle;
-
 sub import_from_file {
 	my $filename = shift;
 
@@ -147,8 +145,7 @@ sub import_from_file {
 	$parser->add_hook(@_);
 
 	print "Pod::Parser: DEBUG: Opening $filename for reading\n" if $parser->{DEBUG};
-	my $fh = new IO::Handle;
-	open $fh, "<$filename" or die "cannot open $filename for reading; $!";
+	open my $fh, "<$filename" or die "cannot open $filename for reading; $!";
 
 	$parser->parse_from_filehandle($fh, \*STDOUT);