X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=editRaid.pl;h=a1de374e59b81b597583d536b882b07c81b035fc;hb=4633e480fd5e37e999b67c3e86a9386870343d2e;hp=fd109320880459d6edab93e7740f5b1c3be9bae0;hpb=aa6a1cd834d42beaf03b7b9ddb5e5686ea3b132e;p=ndwebbie.git diff --git a/editRaid.pl b/editRaid.pl index fd10932..a1de374 100644 --- a/editRaid.pl +++ b/editRaid.pl @@ -18,6 +18,8 @@ #**************************************************************************/ use strict; +use warnings FATAL => 'all'; +no warnings qw(uninitialized); use POSIX; our $BODY; our $DBH; @@ -67,6 +69,11 @@ if ($raid){ if($DBH->do(q{UPDATE raids SET released_coords = FALSE WHERE id = ?},undef,$raid->{id})){ $raid->{released_coords} = 0; } + }elsif (param('cmd') eq 'comment'){ + $DBH->do(q{UPDATE raid_targets SET comment = ? WHERE id = ?} + ,undef,escapeHTML(param('comment')),param('target')) + or $error .= p($DBH->errstr); + }elsif (param('cmd') eq 'change'){ $DBH->begin_work; my $message = escapeHTML(param('message'));