diff --git a/scripts/get_feat.pl b/scripts/get_feat.pl index 10bf23fbc9c5e06e3b417b31171b689db7d43c59..3f73c8534059c8d9e60e48c03d6b5eec97962bfe 100755 --- a/scripts/get_feat.pl +++ b/scripts/get_feat.pl @@ -397,7 +397,7 @@ sub output_matrix { my @lines; my $line = ""; foreach my $arch (sort { - ($arch_table{$a} cmp $arch_table{$b}) or + ($arch_table{$b} cmp $arch_table{$a}) or ("\L$a" cmp "\L$b") } keys %arch_table) {