X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FConfig.pm;h=0d0abae37ff6c489f80cd4b7a413f11ba279e92c;hb=3b1e1d66955e0e1d0b82be0e91fc356c5cefaedf;hp=d85261a5b35599d194c24088427a70a893813a19;hpb=5a7782659ac62794af83a978f281e66db52d80ea;p=debbugs.git

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