X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FRecipients.pm;h=fe99f2515f8f9eda415526a224c134cfe6660e1a;hb=9ba3b5ba7379ac06399d7b296e7796b65fad6149;hp=47c648541044c8cf3f3a4ee2b7923ba2f37225ac;hpb=e598c1b59ab274ee7fcbc1f8d9a8cf280b7a2bd2;p=debbugs.git diff --git a/Debbugs/Recipients.pm b/Debbugs/Recipients.pm index 47c6485..fe99f25 100644 --- a/Debbugs/Recipients.pm +++ b/Debbugs/Recipients.pm @@ -25,7 +25,7 @@ None known. use warnings; use strict; use vars qw($VERSION $DEBUG %EXPORT_TAGS @EXPORT_OK @EXPORT); -use base qw(Exporter); +use Exporter qw(import); BEGIN{ ($VERSION) = q$Revision: 1221 $ =~ /^Revision:\s+([^\s+])/; @@ -111,8 +111,7 @@ sub add_recipients { } return; } - my ($p, $addmaint); - my $anymaintfound=0; my $anymaintnotfound=0; + my ($addmaint); my $ref = $param{data}{bug_num}; for my $p (splitpackages($param{data}{package})) { $p = lc($p); @@ -245,7 +244,7 @@ Using the recipient hashref, determines the set of recipients. If you specify one of C, C, or C, you will receive only a LIST of recipients which the main should be Bcc'ed, Cc'ed, or To'ed respectively. By default, a LIST with keys bcc, cc, and to is returned -with ARRAYREF values correponding to the users to whom a message +with ARRAYREF values corresponding to the users to whom a message should be sent. =over