Fixed minor bugs so own calls are listed on Main again

[ndwebbie.git] / NDWeb / Include.pm

diff --git a/NDWeb/Include.pm b/NDWeb/Include.pm
index 434fc3137a73889d4ef285e842ea0608826b9ceb..2f062bc23fc9042859e93cc6a50ffe1a5b9ac317 100644 (file)
--- a/NDWeb/Include.pm
+++ b/NDWeb/Include.pm
@@ -66,7 +66,7 @@ sub alliances {
        my @alliances;
        $alliance = -1 unless defined $alliance;
        push @alliances,{Id => -1, Name => ' ', Selected => not $alliance};
-       my $query = $ND::DBH->prepare(q{SELECT id,name FROM alliances ORDER BY name});
+       my $query = $ND::DBH->prepare(q{SELECT id,name FROM alliances ORDER BY LOWER(name)});
        $query->execute;        
        while (my $ally = $query->fetchrow_hashref){
                push @alliances,{Id => $ally->{id}, Name => $ally->{name}, Selected => $alliance == $ally->{id}};
@@ -78,7 +78,7 @@ sub intelquery {
        my ($columns,$where) = @_;
        return qq{
 SELECT $columns, i.mission, i.tick AS landingtick,MIN(i.eta) AS eta, i.amount, i.ingal, u.username
-FROM (intel i NATURAL JOIN users u)
+FROM (fleets i NATURAL JOIN users u)
        JOIN current_planet_stats t ON i.target = t.id
        JOIN current_planet_stats o ON i.sender = o.id
 WHERE $where