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 ( $self, $c ) = @_;
my $dbh = $c->model;
+ my $group = $c->req->param('group');
my $emails = $dbh->prepare(q{SELECT email FROM users
WHERE uid IN (SELECT uid FROM groupmembers WHERE gid = $1)
AND email is not null});
- $emails->execute($c->req->param('group'));
+ $emails->execute($group);
my @emails;
while (my $email = $emails->fetchrow_hashref){
push @emails,$email->{email};
}
+ my $subject = $c->req->param('subject');
+ my $message = $c->req->param('message');
my %mail = (
- smtp => 'ruin.nu',
+ smtp => 'localhost',
BCC => (join ',',@emails),
From => 'NewDawn Command <nd@ruin.nu>',
'Content-type' => 'text/plain; charset="UTF-8"',
- Subject => $c->req->param('subject'),
- Message => $c->req->param('message'),
+ Subject => $subject,
+ Message => $message,
);
if (sendmail %mail) {
$c->flash(ok => \@emails);
}else {
$c->flash(error => $Mail::Sendmail::error);
- $c->flash(subject => $c->req->param('subject'));
- $c->flash(message => $c->req->param('message'));
+ $c->flash(subject => $subject);
+ $c->flash(message => $message);
}
$c->res->redirect($c->uri_for('mail'));
});
$query->execute;
$c->stash(sms => $query->fetchall_arrayref({}));
+
+ $c->stash(credits => $dbh->selectrow_array(q{SELECT credits FROM clickatell}));
}
sub postsms : Local {
$c->req->parameters->{uid} = [$c->req->parameters->{uid}]
unless ref $c->req->parameters->{uid} eq 'ARRAY';
+ my $message = $c->req->param('message');
my $query = $dbh->prepare(q{INSERT INTO sms (uid,message,number)
(SELECT $1,$2, trim(leading '+' FROM sms) FROM users u WHERE uid = ANY ($3) AND sms SIMILAR TO '\+\d+' )});
- $query->execute($c->user->id,$c->req->param('message'),$c->req->parameters->{uid});
+ $query->execute($c->user->id,$message,$c->req->parameters->{uid});
$c->res->redirect($c->uri_for('sms'));
}