lib/PublicInbox/Reply.pm | 9 ++++++--- lib/PublicInbox/View.pm | 9 +++++---- diff --git a/lib/PublicInbox/Reply.pm b/lib/PublicInbox/Reply.pm index 0cd36fdad542ee53e2cd9d95b3ef60bedc9d74e9..07288aab3c4fd21f34df3f28cb416144242cecb3 100644 --- a/lib/PublicInbox/Reply.pm +++ b/lib/PublicInbox/Reply.pm @@ -32,7 +32,8 @@ sub mailto_arg_link { my ($ibx, $hdr) = @_; my $cc = {}; # everyone else - my $to; # this is the From address by default + my $to; # this is the From address by defaultq + my $reply_to_all = 'reply-to-all'; # the only good default :P foreach my $rt (split(/\s*,\s*/, $ibx->{replyto} || ':all')) { if ($rt eq ':all') { @@ -43,8 +44,10 @@ my @addrs = PublicInbox::Address::emails($v); add_addrs(\$to, $cc, @addrs); } } elsif ($rt eq ':list') { + $reply_to_all = 'reply-to-list'; add_addrs(\$to, $cc, $ibx->{-primary_address}); } elsif ($rt =~ /\A(?:$reply_headers)\z/io) { + # ugh, this is weird... my $v = $hdr->header($rt); if (defined($v) && ($v ne '')) { my @addrs = PublicInbox::Address::emails($v); @@ -91,13 +94,13 @@ # I'm not sure if address obfuscation and mailto: links can # be made compatible; and address obfuscation is misguided, # anyways. - return (\@arg, '') if $obfs; + return (\@arg, '', $reply_to_all) if $obfs; # order matters, Subject is the least important header, # so it is last in case it's lost/truncated in a copy+paste my $href = "mailto:$to?In-Reply-To=$irt${cc}&Subject=$subj"; - (\@arg, ascii_html($href)); + (\@arg, ascii_html($href), $reply_to_all); } 1; diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm index 81e83d97738256511a530bc4093bfd2793267eb8..70e38a6e567957145e530e34c7542d9e0fb8846f 100644 --- a/lib/PublicInbox/View.pm +++ b/lib/PublicInbox/View.pm @@ -61,7 +61,8 @@ $url = PublicInbox::Hval::prurl($ctx->{env}, $url); $info = qq(\n List information: $url\n); } - my ($arg, $link) = PublicInbox::Reply::mailto_arg_link($ibx, $hdr); + my ($arg, $link, $reply_to_all) = + PublicInbox::Reply::mailto_arg_link($ibx, $hdr); # mailto: link only works if address obfuscation is disabled if ($link) { @@ -83,15 +84,15 @@ href=#t>this message via plain-text email using any one of the following methods: * Save the following mbox file, import it into your mail client, - and reply-to-all from there: mbox 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): +* Reply using the --to, --cc, and --in-reply-to + switches of git-send-email(1): git send-email$arg