'digits',
confirm => '.',
spam => '.',
ban => '.',
lj_form_auth => '.',
);
my $remote = LJ::get_remote() or return "";
my $remote_id = $remote->{'userid'};
my $msg_id = $GET{msgid} || $POST{msgid};
my $msg = LJ::Message->load({msgid => $msg_id, journalid => $remote_id});
return ""
unless $msg && $msg->valid;
return ""
if $msg->type eq "out";
return ""
if LJ::sysban_check( 'spamreport', $remote->user );
my $body = '';
if (LJ::did_post() && $POST{'confirm'}) {
return ""
unless LJ::check_form_auth();
# Some action must be selected
return ""
unless ($POST{spam} || $POST{'ban'});
$body .= '';
# Mark as spam
if ($POST{spam}) {
$body .= '- Message marked as spam.
'
if $msg->mark_as_spam;
}
# Ban user
if ($POST{'ban'}) {
LJ::set_rel($remote_id, $msg->otherid, 'B');
$remote->log_event('ban_set', { actiontarget => $msg->otherid, remote => $remote });
$body .= '- User banned.
';
}
$body .= "
\n";
$body .= "\n";
$body .= "";
return $body;
}
$body .= "";
$body .= "";
$body .= "Note: From the Edit Profile page, you can change your $LJ::SITENAMEABBREV User Messaging settings.
";
return $body;
}
_code?>
<=body
title=>
<=body
page?>