}
sub showraids {
- DB();
if (1){ #TODO: add check for member
my $f = $ND::DBH->prepare(<<SQL
SELECT id FROM raids
$f->execute();
my $calls = "";
while (my ($raid) = $f->fetchrow()){
- $calls .= " https://nd.ruin.nu/raids?raid=$raid |"
+ $calls .= " http://nd.ruin.nu/raids?raid=$raid |"
}
$calls = "No open future raids" if ($f->rows == 0);
chop($calls);