X-Git-Url: https://git.ladys.computer/Gitweb/blobdiff_plain/55f06e7063188f3f6034f019e77a73880c5753c0dd1d95875fd36e7e1c87af7d..d73e7f57c959e8c058edc2671fae5ff07ddb11457554afe6bf82b7409d35712a:/gitweb.perl
diff --git a/gitweb.perl b/gitweb.perl
index 2ff0d7a..ce2c48f 100755
--- 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;
@@ -4213,8 +4214,7 @@ sub git_header_html {
my %opts = @_;
my $title = get_page_title();
- my $content_type = get_content_type_html();
- print $cgi->header(-type=>$content_type, -charset => 'utf-8',
+ print $cgi->header(-type=>get_content_type_html(), -charset => 'utf-8',
-status=> $status, -expires => $expires)
unless ($opts{'-no_http_header'});
my $mod_perl_version = $ENV{'MOD_PERL'} ? " $ENV{'MOD_PERL'}" : '';
@@ -4225,7 +4225,6 @@ sub git_header_html {
-
$title