diff options
Diffstat (limited to 'gitweb/gitweb.perl')
| -rwxr-xr-x | gitweb/gitweb.perl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl index 5fa3ce34fc..ed6bc4adec 100755 --- a/gitweb/gitweb.perl +++ b/gitweb/gitweb.perl @@ -5644,8 +5644,11 @@ sub git_blob { } sub git_tree { + my $expires; if (!defined $hash_base) { $hash_base = "HEAD"; + } elsif ($hash_base =~ m/^[0-9a-fA-F]{40}$/) { + $expires = "+1d"; } if (!defined $hash) { if (defined $file_name) { @@ -5672,7 +5675,7 @@ sub git_tree { my $refs = git_get_references(); my $ref = format_ref_marker($refs, $hash_base); - git_header_html(); + git_header_html(undef, $expires); my $basedir = ''; if (defined $hash_base && (my %co = parse_commit($hash_base))) { my @views_nav = (); |