X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=NDWeb%2FPages%2FEditRaid.pm;fp=NDWeb%2FPages%2FEditRaid.pm;h=61a58143fa79ed93158f615ab00a428903f67faa;hb=e24b2ec10cfd65bc2c7070cbee42294deeb907cc;hp=b0f4f99c7ca2a12e88448cc8087ccbfa20f93f3b;hpb=33e9d7fc67e7e25fd9dee023c753d80f31e21f54;p=ndwebbie.git diff --git a/NDWeb/Pages/EditRaid.pm b/NDWeb/Pages/EditRaid.pm index b0f4f99..61a5814 100644 --- a/NDWeb/Pages/EditRaid.pm +++ b/NDWeb/Pages/EditRaid.pm @@ -223,28 +223,17 @@ sub render_body { } $target->{waves} = \@waves; - my $scans = $DBH->prepare(q{SELECT DISTINCT ON (type) type, tick, scan FROM scans - 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}); + my $scans = $DBH->prepare(q{SELECT DISTINCT ON (type) scan_id,type, tick FROM scans + WHERE planet = ? AND type ~ 'Unit|Planet|Advanced Unit|.* Analysis' AND tick + 24 > tick() + ORDER BY type ,tick DESC}); $scans->execute($target->{planet}); delete $target->{planet}; - my %scans; - while (my $scan = $scans->fetchrow_hashref){ - $scans{$scan->{type}} = $scan; - } my @scans; - 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){ - $scan->{scan} =~ s{}{}; - } - if ($type eq 'Planet'){ - $target->{PlanetScan} = $scan->{scan}; - next; - } - push @scans,{Scan => $scan->{scan}}; + my $i = 0; + while (my $scan = $scans->fetchrow_hashref){ + $scan->{ODD} = $i++ % 2; + push @scans,$scan; } $target->{Scans} = \@scans; push @targets,$target;