my $dbh = $c->model;
my $query = $dbh->prepare(q{
-SELECT uid,username,pnick,array_to_string(array_agg(g.groupname),', ') AS groups
+SELECT uid,username,discord_id,pnick,array_to_string(array_agg(g.groupname),', ') AS groups
FROM users u LEFT OUTER JOIN (groupmembers gm NATURAL JOIN groups g) USING (uid)
WHERE uid > 0
GROUP BY u.uid,username,pnick
}
my %mail = (
- smtp => 'ruin.nu',
+ smtp => 'localhost',
BCC => (join ',',@emails),
From => 'NewDawn Command <nd@ruin.nu>',
'Content-type' => 'text/plain; charset="UTF-8"',
});
$query->execute;
$c->stash(sms => $query->fetchall_arrayref({}));
+
+ $c->stash(credits => $dbh->selectrow_array(q{SELECT credits FROM clickatell}));
}
sub postsms : Local {