use CGI qw/:standard/;
use ND::Web::Include;
-our @ISA = qw/ND::Web::XMLPage/;
+use base qw/ND::Web::XMLPage/;
$ND::Web::Page::PAGES{editRaid} = __PACKAGE__;
,undef,escapeHTML(param('comment')),param('target'))
or $error .= p($DBH->errstr);
- }elsif (param('cmd') eq 'change'){
+ }elsif (param('cmd') eq 'change' || param('cmd') eq 'submit'){
$DBH->begin_work;
my $message = escapeHTML(param('message'));
$raid->{message} = $message;