switch to compatibility level 12

[debbugs.git] / Debbugs / CGI.pm

diff --git a/Debbugs/CGI.pm b/Debbugs/CGI.pm
index d371ffe8e3eceed6c66b926a7444f67c6bb42f57..7dabb1ef47cd394d46c3ad51f3a494067d5b9277 100644 (file)
--- a/Debbugs/CGI.pm
+++ b/Debbugs/CGI.pm
@@ -147,6 +147,8 @@ Creates a link to the version cgi script
 
 =item fixed -- arrayref of fixed versions
 
+=item format -- optional image format override
+
 =item width -- optional width of graph
 
 =item height -- optional height of graph
@@ -171,6 +173,9 @@ sub version_url{
                                           fixed   => {type => ARRAYREF,
                                                       default => [],
                                                      },
+                                          format  => {type => SCALAR,
+                                                      optional => 1,
+                                                     },
                                           width   => {type => SCALAR,
                                                       optional => 1,
                                                      },
@@ -410,8 +415,6 @@ sub package_links {
      for my $type (qw(maint owner submitter correspondent)) {
         next unless exists $param{$type};
         for my $target (make_list($param{$type})) {
-            my $addr = getparsedaddrs($target);
-            $addr = defined $addr?$addr->address:'';
             if ($has_options) {
                 push @links,
                     (munge_url('pkgreport.cgi?',