diff options
author | Eric Wong <e@80x24.org> | 2022-08-20 08:01:34 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2022-08-20 18:30:57 +0000 |
commit | 038d977cc25177759537a89ca078701f14d3ace0 (patch) | |
tree | bcbd6964fe3b17c471b3be444b5df7f94cb67a18 /lib/PublicInbox/WwwText.pm | |
parent | 63cafb59760fdb73a15c22210c59fe0f13d79e88 (diff) | |
download | public-inbox-038d977cc25177759537a89ca078701f14d3ace0.tar.gz |
Showing "../../foo.git" looks awkward and isn't conducive to users who want to "git clone" a URL.
Diffstat (limited to 'lib/PublicInbox/WwwText.pm')
-rw-r--r-- | lib/PublicInbox/WwwText.pm | 12 |
1 files changed, 2 insertions, 10 deletions
diff --git a/lib/PublicInbox/WwwText.pm b/lib/PublicInbox/WwwText.pm index 581a19f3..c6957e81 100644 --- a/lib/PublicInbox/WwwText.pm +++ b/lib/PublicInbox/WwwText.pm @@ -246,20 +246,12 @@ sub coderepos_raw ($$) { my ($ctx, $top_url) = @_; my $cr = $ctx->{ibx}->{coderepo} // return (); my $cfg = $ctx->{www}->{pi_cfg}; - my @ret; + my @ret = ('Code repositories for project(s) associated with this '. + $ctx->{ibx}->thing_type . "\n"); for my $cr_name (@$cr) { - $ret[0] //= do { - my $thing = $ctx->{ibx}->can('cloneurl') ? - 'public inbox' : 'external index'; - <<EOF; -Code repositories for project(s) associated with this $thing -EOF - }; my $urls = $cfg->get_all("coderepo.$cr_name.cgiturl"); if ($urls) { for (@$urls) { - # relative or absolute URL?, prefix relative - # "foo.git" with appropriate number of "../" my $u = m!\A(?:[a-z\+]+:)?//!i ? $_ : $top_url.$_; $ret[0] .= "\n\t" . prurl($ctx->{env}, $u); |