[carton] 456/472: sort case insensitive, like PAUSE

Lucas Kanashiro kanashiro-guest at moszumanska.debian.org
Fri Jul 24 00:39:36 UTC 2015


This is an automated email from the git hooks/post-receive script.

kanashiro-guest pushed a commit to branch master
in repository carton.

commit 9ebc52595f7e027f2898636cc93d8ebaff249076
Author: Tatsuhiko Miyagawa <miyagawa at bulknews.net>
Date:   Wed Apr 29 13:42:37 2015 -0700

    sort case insensitive, like PAUSE
---
 lib/Carton/Index.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Carton/Index.pm b/lib/Carton/Index.pm
index f59a65b..3ce215c 100644
--- a/lib/Carton/Index.pm
+++ b/lib/Carton/Index.pm
@@ -17,7 +17,7 @@ sub count {
 
 sub packages {
     my $self = shift;
-    sort { $a->name cmp $b->name } values %{$self->_packages};
+    sort { lc $a->name cmp lc $b->name } values %{$self->_packages};
 }
 
 sub write {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/carton.git



More information about the Pkg-perl-cvs-commits mailing list