aboutsummaryrefslogtreecommitdiffstats
path: root/bin/zurich
diff options
context:
space:
mode:
Diffstat (limited to 'bin/zurich')
-rwxr-xr-xbin/zurich/overdue-alert4
1 files changed, 3 insertions, 1 deletions
diff --git a/bin/zurich/overdue-alert b/bin/zurich/overdue-alert
index 3b312c4db..90e31df1c 100755
--- a/bin/zurich/overdue-alert
+++ b/bin/zurich/overdue-alert
@@ -49,7 +49,8 @@ sub loop_through {
my %to_send = ();
while (my $row = $reports->next) {
- $to_send{$row->bodies_str} .= '* ' . $row->id . ": '" . $row->title . "'\n\n";
+ $to_send{$row->bodies_str} ||= [];
+ push @{$to_send{$row->bodies_str}}, $row;
}
foreach my $body_id (keys %to_send) {
@@ -66,6 +67,7 @@ sub send_alert {
my $h = {
data => $data,
admin_url => $cobrand->admin_base_url,
+ cobrand => $cobrand,
};
my $to = [ [ $body_email, $body->name ] ];