gitweb: use HEAD as secondary sort key in git_get_heads_list()

[Gitweb] / gitweb.perl

diff --git a/gitweb.perl b/gitweb.perl
index 2ff0d7a554a381bbe9821a20f33d092f65a48a97677cfd35d55c84befa7537c0..8cfa7b8c32346b0c8a49035e6cc5dabc263c26fd88e755580f6d350c24ed6657 100755 (executable)
--- a/gitweb.perl
+++ b/gitweb.perl
@@ -3797,7 +3797,8 @@ sub git_get_heads_list {
        my @headslist;
 
        open my $fd, '-|', git_cmd(), 'for-each-ref',
-               ($limit ? '--count='.($limit+1) : ()), '--sort=-committerdate',
+               ($limit ? '--count='.($limit+1) : ()),
+               '--sort=-HEAD', '--sort=-committerdate',
                '--format=%(objectname) %(refname) %(subject)%00%(committer)',
                @patterns
                or return;