]> ruin.nu Git - ndwebbie.git/commitdiff
Advanced Unit instead of Military
authorMichael Andreen <harv@ruin.nu>
Sun, 4 Feb 2007 18:10:51 +0000 (18:10 +0000)
committerMichael Andreen <harv@ruin.nu>
Sun, 4 Feb 2007 18:10:51 +0000 (18:10 +0000)
ND/Web/Pages/Check.pm
ND/Web/Pages/Raids.pm

index 8baa874689e1cf9fb2d9f4b5bda8f39852e43e92..48186b3d290cfaa6778c564415d16e4c8b9d3bb1 100644 (file)
@@ -190,7 +190,7 @@ sub render_body {
                while (my($type,$scan_id,$tick,$scan) = $query->fetchrow){
                        $scans{$type} = [$scan_id,$tick,$scan];
                }
-               for my $type ('Planet','Jumpgate','Unit','Military','Fleet Analysis','Surface Analysis','Technology Analysis','News'){
+               for my $type ('Planet','Jumpgate','Unit','Advanced Unit','Fleet Analysis','Surface Analysis','Technology Analysis','News'){
                        next unless exists $scans{$type};
                        my $scan_id = $scans{$type}->[0];
                        my $tick = $scans{$type}->[1];
index c46571288cd3c836d8135ebdcb9e7506fe91b5dd..eddd7c8935e7de626374bf4b606d12d98321470d 100644 (file)
@@ -224,7 +224,7 @@ sub render_body {
                        $target{comment} = parseMarkup($target->{comment}) if ($target->{comment});
 
                        my $scans = $DBH->prepare(q{SELECT DISTINCT ON (type) type, tick, scan FROM scans 
-                               WHERE planet = ? AND type ~ 'Unit|Planet|Military|.* Analysis' AND tick + 24 > tick() AND scan is not null
+                               WHERE planet = ? AND type ~ 'Unit|Planet|Advanced Unit|.* Analysis' AND tick + 24 > tick() AND scan is not null
                                GROUP BY type, tick, scan ORDER BY type ,tick DESC});
                        $scans->execute($target->{planet});
                        my %scans;
@@ -233,7 +233,7 @@ sub render_body {
                        }
 
                        my @scans;
-                       for my $type ('Planet','Unit','Military','Surface Analysis','Technology Analysis'){
+                       for my $type ('Planet','Unit','Advanced Unit','Surface Analysis','Technology Analysis'){
                                next unless exists $scans{$type};
                                my $scan = $scans{$type};
                                if ($self->{TICK} - $scan->{tick} > 5){