From: Don Armstrong <don@donarmstrong.com>
Date: Sat, 6 Jul 2019 03:15:23 +0000 (-0700)
Subject: switch to IO::File->new
X-Git-Url: https://git.donarmstrong.com/?p=debbugs.git;a=commitdiff_plain;h=3b1e1d66955e0e1d0b82be0e91fc356c5cefaedf

switch to IO::File->new
---

diff --git a/Debbugs/Config.pm b/Debbugs/Config.pm
index d85261a..0d0abae 100644
--- a/Debbugs/Config.pm
+++ b/Debbugs/Config.pm
@@ -1151,7 +1151,7 @@ sub read_config{
 	 return;
      }
      # first, figure out what type of file we're reading in.
-     my $fh = new IO::File $conf_file,'r'
+     my $fh = IO::File->new($conf_file,'r')
 	  or die "Unable to open configuration file $conf_file for reading: $!";
      # A new version configuration file must have a comment as its first line
      my $first_line = <$fh>;