Main and Intel pages updated for new scan structure

[ndwebbie.git] / NDWeb / XMLPage.pm

diff --git a/NDWeb/XMLPage.pm b/NDWeb/XMLPage.pm
index 3e026080963f0fd4bcbe52dd322e199576e09379..eb25c6815a7533a8acb6799837b354b8165eefbd 100644 (file)
--- a/NDWeb/XMLPage.pm
+++ b/NDWeb/XMLPage.pm
@@ -101,7 +101,8 @@ sub render : method {
        }
 
        unless ($self->{XML}){
-               my $fleetupdate = $DBH->selectrow_array('SELECT landing_tick FROM fleets WHERE uid = ? AND fleet = 0',undef,$self->{UID});
+               #TODO: Need to fix this with new stuff.
+               my $fleetupdate = $DBH->selectrow_array(q{SELECT tick FROM fleets WHERE sender = ? AND mission = 'Full fleet' AND tick > tick() - 24},undef,$self->{PLANET});
 
                $fleetupdate = 0 unless defined $fleetupdate;