about summary refs log tree commit homepage
path: root/lib/PublicInbox/RepoGitSnapshot.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/PublicInbox/RepoGitSnapshot.pm')
-rw-r--r--lib/PublicInbox/RepoGitSnapshot.pm10
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/PublicInbox/RepoGitSnapshot.pm b/lib/PublicInbox/RepoGitSnapshot.pm
index 9ba4c04a..44a6bd59 100644
--- a/lib/PublicInbox/RepoGitSnapshot.pm
+++ b/lib/PublicInbox/RepoGitSnapshot.pm
@@ -45,24 +45,24 @@ sub call_git_snapshot ($$) { # invoked by PublicInbox::RepoBase::call
         return $self->r(404) unless ($ref =~ s/\.($SUFFIX)\z//o);
         my $fmt = $1;
         my $env = $req->{env};
-        my $repo_info = $req->{repo_info};
+        my $repo = $req->{-repo};
 
         # support disabling certain snapshots types entirely to twart
         # URL guessing since it could burn server resources.
-        return $self->r(404) if $repo_info->{snapshots_disabled}->{$fmt};
+        return $self->r(404) if $repo->{snapshots_disabled}->{$fmt};
 
         # strip optional basename (may not exist)
-        $ref =~ s/$repo_info->{snapshot_re}//;
+        $ref =~ s/$repo->{snapshot_re}//;
 
         # don't allow option/command injection, git refs do not start with '-'
         return $self->r(404) if $ref =~ /\A-/;
 
-        my $git = $repo_info->{git};
+        my $git = $repo->{git};
         my $tree = '';
         my $last_cb = sub {
                 delete $env->{'repobrowse.tree_cb'};
                 delete $env->{'qspawn.quiet'};
-                my $pfx = "$repo_info->{snapshot_pfx}-$ref/";
+                my $pfx = "$repo->{snapshot_pfx}-$ref/";
                 my $cmd = $git->cmd('archive',
                                 "--prefix=$pfx", "--format=$fmt", $tree);
                 my $rdr = { 2 => $git->err_begin };