viewvcs: expand on path names being "non-authoritative"

[public-inbox.git] / lib / PublicInbox / RepoTree.pm

diff --git a/lib/PublicInbox/RepoTree.pm b/lib/PublicInbox/RepoTree.pm
index 7434e9b275f08d2dd8f5c19e1333bb0b2b40ff0e..3a848c6ff9b468701ebe8d0c72309d5e67d479a8 100644 (file)
--- a/lib/PublicInbox/RepoTree.pm
+++ b/lib/PublicInbox/RepoTree.pm
@@ -51,11 +51,12 @@ sub tree_show { # git check_async callback
        my ($oid, $type, $size, $ctx) = @_;
        return find_missing($ctx) if $type eq 'missing';
 
-       open $ctx->{lh}, '<', \(my $dbg_log = '') or die "open(scalar): $!";
        my $res = [ $ctx->{git}, $oid, $type, $size ];
        my ($bn) = ($ctx->{-path} =~ m!/?([^/]+)\z!);
        if ($type eq 'blob') {
                my $obj = ascii_html($ctx->{-obj});
+               $ctx->{-q_value_html} = 'dfn:'.ascii_html($ctx->{-path}) .
+                       ' dfpost:'.substr($oid, 0, 7);
                $ctx->{-paths} = [ $bn, qq[(<a
 href="$ctx->{-upfx}$oid/s/$bn">raw</a>)
 \$ git show $obj\t# shows this blob on the CLI] ];