From: Marius Gavrilescu <marius@ieval.ro>
Date: Fri, 17 Jul 2015 11:15:15 +0000 (+0300)
Subject: No need for IO::Handle
X-Git-Tag: 0.18~8
X-Git-Url: http://git.ieval.ro/?p=pod-constants.git;a=commitdiff_plain;h=94e0b31b04205bddac4ea3ffbf55a948d0148661

No need for IO::Handle
---

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);