X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=intel.pl;h=30b6cf8083e465eff010bcfca0e328989d28e1cd;hb=d4f6d6c2da5d5459d1e32df469bcb4f2215ea82a;hp=2b33c5e4849d19afff8f79f7781aa83ea798f6b4;hpb=0c6242438cc218a6a6980c961484b8c74d547eee;p=ndwebbie.git diff --git a/intel.pl b/intel.pl index 2b33c5e..30b6cf8 100644 --- a/intel.pl +++ b/intel.pl @@ -143,6 +143,7 @@ if ($planet){ OR ( t.alliance_id = o.alliance_id AND i.mission = 'Attack')) AND i.sender NOT IN (SELECT planet FROM users u NATURAL JOIN groupmembers gm WHERE gid = 8 AND planet IS NOT NULL) $showticks})); + $query->execute() or print $DBH->errstr; my @intellists; my @intel; @@ -154,7 +155,7 @@ if ($planet){ } push @intel,$intel; } - push @intellists,{Message => q{Missions where alliances doesn't match}, Intel => \@intel, Origin => 1, Target => 1}; + push @intellists,{Message => q{Intel where alliances doesn't match}, Intel => \@intel, Origin => 1, Target => 1}; $BODY->param(IntelLIsts => \@intellists); } my $query = $DBH->prepare(q{SELECT i.id, u.username, i.message, report_date FROM intel_messages i