From: Michael Andreen <harv@ruin.nu>
Date: Tue, 18 Sep 2007 18:08:29 +0000 (+0200)
Subject: Order case insensitive
X-Git-Url: https://ruin.nu/git/?a=commitdiff_plain;h=9d5814b742ee4fae0209ae238bcea9db11137fdf;p=ndwebbie.git

Order case insensitive
---

diff --git a/NDWeb/Include.pm b/NDWeb/Include.pm
index 434fc31..5ef1dba 100644
--- 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 => '&nbsp;', 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}};