diff options
Diffstat (limited to 'perllib/Problems.pm')
| -rw-r--r-- | perllib/Problems.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perllib/Problems.pm b/perllib/Problems.pm index c1430b540..c31fdd507 100644 --- a/perllib/Problems.pm +++ b/perllib/Problems.pm @@ -447,8 +447,8 @@ the cobrand if a cobrand is specified. =cut sub contact_counts { - my ($cobrand) = @_; - my $contact_restriction = Cobrand::contact_restriction($cobrand); + my ( $c ) = @_; + my $contact_restriction = $c->cobrand->contact_restriction; my $contacts = dbh()->selectcol_arrayref("select confirmed, count(*) as c from contacts $contact_restriction group by confirmed", { Columns => [1,2] }); return $contacts; } |