data can be a HASHREF not a SCALAR in check_limit

[debbugs.git] / Debbugs / Control.pm

diff --git a/Debbugs/Control.pm b/Debbugs/Control.pm
index afd85bded1d051be0373bee6d4afd4e79fac173f..592c31572f9c0906e3fbf7789e7bd9057890a4f9 100644 (file)
--- a/Debbugs/Control.pm
+++ b/Debbugs/Control.pm
@@ -3707,7 +3707,7 @@ limit to succeed.
 
 sub check_limit{
     my %param = validate_with(params => \@_,
-                             spec   => {data  => {type => ARRAYREF|SCALAR,
+                             spec   => {data  => {type => ARRAYREF|HASHREF,
                                                  },
                                         limit => {type => HASHREF|UNDEF,
                                                  },
@@ -3799,7 +3799,9 @@ sub __message_body_template{
      my $hole_var = {'&bugurl' =>
                     sub{"$_[0]: ".
                             'http://'.$config{cgi_domain}.'/'.
-                                Debbugs::CGI::bug_url($_[0]);
+                                Debbugs::CGI::bug_links(bug => $_[0],
+                                                        links_only => 1,
+                                                       );
                     }
                    };