INSERT INTO irc_requests (uid,channel,message) VALUES($1,$2,$3)
});
$query->execute($c->user->id,$c->req->param('channel'),$c->req->param('message'));
- system 'killall','-USR1', 'irssi';
+ system 'killall','-USR1', 'ndbot.pl';
$c->flash(reply => "Msg sent to: ".$c->req->param('channel'));
$c->res->redirect($c->uri_for('ircrequest'));
`perl $FindBin::Bin/parsegalaxies.pl $updated`;
`perl $FindBin::Bin/ndrank.pl`;
$dbh->do(q{UPDATE misc SET value = ? WHERE id = 'TICK'}, undef, $updated);
- system 'killall','-USR1', 'irssi';
+ system 'killall','-USR1', 'ndbot.pl';
local $dbh->{Warn} = 0;
}
#$dbh->rollback;
$dbh->commit;
-system 'killall','-USR1', 'irssi' if $parsedscans;
+system 'killall','-USR1', 'ndbot.pl' if $parsedscans;
sub addfleet {
my ($name,$mission,$ships,$sender,$tick,$amount) = @_;
my $update = $dbh->prepare("UPDATE misc SET value = value::int + 1 WHERE id = 'TICK'");
$update->execute();
-system 'killall','-USR1', 'irssi';
+system 'killall','-USR1', 'ndbot.pl';
$dbh->disconnect;