X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=cgi%2Fversion.cgi;h=ed0be6304ac58e094ffe4e3d8d458238e9391e48;hb=e30a48719169aa2ded02d432f2bca8b91ba011e3;hp=f6f377c22f5e909f1f94c723edc281132acd85b9;hpb=9c907cb68374f814eb419956de9b302bf19e5ee9;p=debbugs.git

diff --git a/cgi/version.cgi b/cgi/version.cgi
index f6f377c..ed0be63 100755
--- a/cgi/version.cgi
+++ b/cgi/version.cgi
@@ -15,12 +15,12 @@ BEGIN{
 use CGI::Simple;
 
 # by default send this message nowhere
-use CGI::Alert q(nobody@example.com);
+# use CGI::Alert q(nobody@example.com);
 
 use Debbugs::Config qw(:config);
 
 BEGIN{
-     $CGI::Alert::Maintainer = $config{maintainer};
+     # $CGI::Alert::Maintainer = $config{maintainer};
 }
 
 use Debbugs::CGI qw(htmlize_packagelinks html_escape cgi_parameters munge_url);
@@ -125,7 +125,7 @@ my $version = Debbugs::Versions->new(\&Debbugs::Versions::Dpkg::vercmp);
 foreach my $source (keys %sources) {
      my $srchash = substr $source, 0, 1;
      next unless -e "$config{version_packages_dir}/$srchash/$source";
-     my $version_fh = IO::File->("$config{version_packages_dir}/$srchash/$source", 'r') or
+     my $version_fh = IO::File->new("$config{version_packages_dir}/$srchash/$source", 'r') or
 	  warn "Unable to open $config{version_packages_dir}/$srchash/$source for reading: $!";
      $version->load($version_fh);
 }