lib/PublicInbox/Config.pm | 2 +- lib/PublicInbox/View.pm | 8 +++++++- diff --git a/lib/PublicInbox/Config.pm b/lib/PublicInbox/Config.pm index d7eaa3e8f1c5100279deaefc7a0a8f1973023c5d..1256fb1e7df208ca9bb17fb269ad639d99c789c6 100644 --- a/lib/PublicInbox/Config.pm +++ b/lib/PublicInbox/Config.pm @@ -141,7 +141,7 @@ my ($self, $pfx) = @_; my $rv = {}; foreach my $k (qw(mainrepo address filter url newsgroup - watch watchheader httpbackendmax)) { + infourl watch watchheader httpbackendmax)) { my $v = $self->{"$pfx.$k"}; $rv->{$k} = $v if defined $v; } diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm index 3b041aab2ae64f0957724ae2e7344209c7573cf6..3d6348c71850e308b95ad61f275dbc9c37cc757b 100644 --- a/lib/PublicInbox/View.pm +++ b/lib/PublicInbox/View.pm @@ -51,6 +51,12 @@ 'https://kernel.org/pub/software/scm/git/docs/git-send-email.html'; my $p_url = 'https://en.wikipedia.org/wiki/Posting_style#Interleaved_style'; + my $info = ''; + if (my $url = $ctx->{-inbox}->{infourl}) { + $url = PublicInbox::Hval::prurl($ctx->{env}, $url); + $info = qq(\n List information: $url\n); + } + my ($arg, $link) = mailto_arg_link($hdr); push @$arg, '/path/to/YOUR_REPLY'; $arg = join(" \\\n ", '', @$arg); @@ -67,7 +73,7 @@ Avoid top-posting and favor interleaved quoting: $p_url - +$info * Reply to all the recipients using the --to, --cc, and --in-reply-to switches of git-send-email(1):