From 4009536b6c5bbcacf855eaaaa75a52f8f82a6f3c Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 23 Aug 2005 12:41:07 +0000 Subject: fix sort --- perl-install/Xconfig/resolution_and_depth.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/Xconfig') diff --git a/perl-install/Xconfig/resolution_and_depth.pm b/perl-install/Xconfig/resolution_and_depth.pm index e8a4e5a89..2faebe5b6 100644 --- a/perl-install/Xconfig/resolution_and_depth.pm +++ b/perl-install/Xconfig/resolution_and_depth.pm @@ -235,7 +235,7 @@ sub set_default_background { my %theme = getVarsFromSh('/etc/sysconfig/bootsplash'); my @l = sort { - $a->[1] <=> $b->[1] || $b->[2] <=> $a->[2] || $a->[1] <=> $b->[1]; + $a->[1] <=> $b->[1] || $b->[2] <=> $a->[2] || $a->[3] <=> $b->[3]; } map { if (my ($X, $Y) = /^$theme{THEME}-(\d+)x(\d+).png$/) { [ -- cgit v1.2.1