From c214dae526d08190ae314735ee981f53ad75d751 Mon Sep 17 00:00:00 2001 From: Owen Leonard Date: Fri, 25 Feb 2011 10:16:40 -0500 Subject: [PATCH] Fix for Bug 5812 - Tag Cloud - capitalized words come before lower-case words Content-Type: text/plain; charset="utf-8" --- opac/opac-tags.pl | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/opac/opac-tags.pl b/opac/opac-tags.pl index b98ce40..b5ce340 100755 --- a/opac/opac-tags.pl +++ b/opac/opac-tags.pl @@ -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); -- 1.7.3