X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FControl.pm;h=592c31572f9c0906e3fbf7789e7bd9057890a4f9;hb=ff1505cfc25a978b784449b4ab4276844a25c2b3;hp=6851656f49c6b4d4bde5c4c857cbb8584a2cde0a;hpb=530a003a7180eaba23b695561ca01a595a3c7190;p=debbugs.git

diff --git a/Debbugs/Control.pm b/Debbugs/Control.pm
index 6851656..592c315 100644
--- a/Debbugs/Control.pm
+++ b/Debbugs/Control.pm
@@ -99,6 +99,7 @@ BEGIN{
 		     clone   => [qw(clone_bug)],
 		     archive => [qw(bug_archive bug_unarchive),
 				],
+		     limit   => [qw(check_limit)],
 		     log     => [qw(append_action_to_log),
 				],
 		    );
@@ -2020,7 +2021,7 @@ sub set_merged {
     $new_locks += $n_locks;
     %data = %{$data};
     @data = values %data;
-    if (not __check_limit(data => [@data],
+    if (not check_limit(data => [@data],
 			  exists $param{limit}?(limit => $param{limit}):(),
 			  transcript => $transcript,
 			 )) {
@@ -3618,7 +3619,7 @@ sub __begin_control {
 	    }
 	}
     }
-    if (not __check_limit(data => \@data,
+    if (not check_limit(data => \@data,
 			  exists $param{limit}?(limit => $param{limit}):(),
 			  transcript => $transcript,
 			 )) {
@@ -3685,9 +3686,9 @@ sub __end_control {
 }
 
 
-=head2 __check_limit
+=head2 check_limit
 
-     __check_limit(data => \@data, limit => $param{limit});
+     check_limit(data => \@data, limit => $param{limit});
 
 
 Checks to make sure that bugs match any limits; each entry of @data
@@ -3704,9 +3705,9 @@ limit to succeed.
 =cut
 
 
-sub __check_limit{
+sub check_limit{
     my %param = validate_with(params => \@_,
-			      spec   => {data  => {type => ARRAYREF|SCALAR,
+			      spec   => {data  => {type => ARRAYREF|HASHREF,
 						  },
 					 limit => {type => HASHREF|UNDEF,
 						  },
@@ -3798,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,
+							);
 		     }
 		    };