X-Git-Url: https://ruin.nu/git/?p=NDIRC.git;a=blobdiff_plain;f=Delling.pm;fp=Delling.pm;h=4f779848a476bdddfe74ee2a95f89a5fe0f8fb62;hp=c6df7f24b7c5f9d5fb64f786ae7260592b4e6e24;hb=4c2994d62294e1ea2232627b09eb2254ef82f264;hpb=faaa3329a3df738727b7ff63831c195a3c81ad09 diff --git a/Delling.pm b/Delling.pm index c6df7f2..4f77984 100644 --- a/Delling.pm +++ b/Delling.pm @@ -172,6 +172,11 @@ sub refresh { if (defined $row[1] && $stattick != $row[1]){ $stattick = $row[1]; $self->toTarget(spam => "New tick: $stattick"); + my $raids = $dbh->prepare(q{UPDATE raids SET open = true WHERE NOT open AND NOT removed AND open_tick <= $1 RETURNING id}); + $raids->execute($stattick); + while (my $raid = $raids->fetchrow_hashref) { + $self->toTarget(members => "\@everyone Raid is now open: https://nd.ruin.nu/raids/view/$raid->{id}"); + } } my $ircreqs = $dbh->prepare(q{SELECT id,username,message,channel FROM irc_requests NATURAL JOIN users WHERE not sent}); my $upircreq = $dbh->prepare(q{UPDATE irc_requests SET sent = TRUE WHERE id = ?});