From 5f94f79febfac25f2443a5e9a364a848752eaacb Mon Sep 17 00:00:00 2001 From: Peter Eisentraut Date: Tue, 15 Aug 2017 09:58:15 -0400 Subject: [PATCH] Improve sort order of branches for new version 10 --- wwwtools/nls-status-page | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/wwwtools/nls-status-page b/wwwtools/nls-status-page index f3d4977..3d9c6c1 100755 --- a/wwwtools/nls-status-page +++ b/wwwtools/nls-status-page @@ -87,7 +87,9 @@ my %branch_status = ( '10-branch' => 'translate this now', ); -my @branches = map { m!table-([^/]+).html$! && $1 } reverse sort glob("$dir/table-*.html"); +my @branches = reverse sort { + $a eq 'master' ? 1 : ($b eq 'master' ? -1 : $a <=> $b) +} map { m!table-([^/]+).html$! && $1 } glob("$dir/table-*.html"); foreach my $b (@branches) { my $title; -- 2.39.5