]> Sergey Matveev's repositories - public-inbox.git/blobdiff - lib/PublicInbox/ViewVCS.pm
viewvcs: add path name hint based on `b=' query param
[public-inbox.git] / lib / PublicInbox / ViewVCS.pm
index 37b688ed586e4e6ae42837cad03679d5ebb7411b..00db8ff241a14e039ac6fc7a8ecaab37da3edb2c 100644 (file)
@@ -501,8 +501,13 @@ sub solve_result {
        return show_tag($ctx, $res) if $type eq 'tag';
        return show_other($ctx, $res) if $type ne 'blob';
        my $paths = $ctx->{-paths} //= do {
-               my $path = to_filename($di->{path_b}//$hints->{path_b}//'blob');
+               my $fn = $di->{path_b} // $hints->{path_b};
+               my $path = to_filename($fn // 'blob');
                my $raw_more = qq[(<a\nhref="$path">raw</a>)];
+
+               # XXX not sure if this is the correct wording
+               defined($fn) and $raw_more .=
+"\nname: ${\ascii_html($fn)} \t # note: path name is non-authoritative";
                [ $path, $raw_more ];
        };