Mercurial > hg > reproctool
changeset 43:964393fff57e default tip
Case insensitive sorting to match game
author | Dominic Cleal <dominic@computerkb.co.uk> |
---|---|
date | Wed, 28 Jan 2009 16:43:51 +0000 |
parents | 783d0f954927 |
children | |
files | reproctool.cgi |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/reproctool.cgi Sun Jan 25 21:33:39 2009 +0000 +++ b/reproctool.cgi Wed Jan 28 16:43:51 2009 +0000 @@ -251,7 +251,7 @@ } # Now match up the item lookups to the input list -foreach (sort @item_names) +foreach (sort { lc $a cmp lc $b } @item_names) { push @output, (exists $item_lookup->{$_} ? $item_lookup->{$_} : { name => $_ } );