Fix for Bug 5812 - Tag Cloud - capitalized words come before lower-case words

Signed-off-by: Nicole C. Engard <nengard@bywatersolutions.com>
Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
This commit is contained in:
Owen Leonard 2011-02-20 21:32:22 -05:00 committed by Chris Cormack
parent b5ee2f201b
commit edafbd941d

View file

@ -293,7 +293,7 @@ if ($add_op) {
}
}
(scalar @errors ) and $template->param(ERRORS => \@errors);
my @orderedresult = sort { $a->{'term'} cmp $b->{'term'} } @$results;
my @orderedresult = sort { uc($a->{'term'}) cmp uc($b->{'term'}) } @$results;
(scalar @$results) and $template->param(TAGLOOP => \@orderedresult );
(scalar @$my_tags) and $template->param(MY_TAGS => $my_tags);