- push @alliances,{Id => -1, Name => ' ', Selected => not $alliance};
+ push @alliances,{Id => -1, Name => '', Selected => not $alliance};
my $query = $ND::DBH->prepare(q{SELECT id,name FROM alliances ORDER BY LOWER(name)});
$query->execute;
while (my $ally = $query->fetchrow_hashref){
my $query = $ND::DBH->prepare(q{SELECT id,name FROM alliances ORDER BY LOWER(name)});
$query->execute;
while (my $ally = $query->fetchrow_hashref){