$c->stash(u => $dbh->selectrow_hashref(q{SELECT pid AS planet,defense_points
,attack_points,scan_points,humor_points
, (attack_points+defense_points+scan_points/20)::NUMERIC(5,1) as total_points
- , sms,rank,hostmask,call_if_needed,sms_note,defprio
+ , rank,defprio
FROM users_defprio WHERE uid = ?
},undef,$c->user->id)
);
}
-sub posthostupdate : Local {
- my ( $self, $c ) = @_;
- my $dbh = $c->model;
-
- my $hostname = html_escape $c->req->param('hostname');
- $dbh->do(q{UPDATE users SET hostmask = ? WHERE uid = ?
- },undef, $hostname, $c->user->id);
-
- $c->res->redirect($c->uri_for(''));
-}
-
sub postattackgroups : Local {
my ( $self, $c ) = @_;
my $dbh = $c->model;
$c->res->redirect($c->uri_for(''));
}
-sub postsmsupdate : Local {
- my ( $self, $c ) = @_;
- my $dbh = $c->model;
-
- my $callme = $c->req->param('callme') || 0;
- my $sms = html_escape $c->req->param('sms');
- my $smsnote = $c->req->param('smsnote');
- $dbh->do(q{
-UPDATE users SET sms = $1, call_if_needed = $2, sms_note = $3 WHERE uid = $4
- },undef, $sms, $callme, $smsnote, $c->user->id);
-
- $c->res->redirect($c->uri_for(''));
-}
-
sub postowncoords : Local {
my ( $self, $c ) = @_;
my $dbh = $c->model;