undef/git-commit-vandalism
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[PATCH] Add "--chain-reply-to" to git-send-email-script, to control whether or not the

Browse Source 
Note, using --no-chain-reply-to means you probably want to put a special
message into the first email you send, i.e, a 0/N patch cover sheet.

Signed-off-by: Ryan Anderson <ryan@michonline.com>
Signed-off-by: Junio C Hamano <junkio@cox.net>
This commit is contained in:
Ryan Anderson 2005-07-31 20:04:24 -04:00 committed by Junio C Hamano
parent f3d9f3546b
commit 78488b2c4d
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
git-send-email-script
View File

@ -27,6 +27,9 @@ use Email::Valid;
# Variables we fill in automatically, or via prompting: # Variables we fill in automatically, or via prompting:
my (@to,@cc,$initial_reply_to,$initial_subject,@files,$from); my (@to,@cc,$initial_reply_to,$initial_subject,@files,$from);
# Behavior modification variables
my ($chain_reply_to) = (1);
# Example reply to: # Example reply to:
#$initial_reply_to = ''; #<20050203173208.GA23964@foobar.com>'; #$initial_reply_to = ''; #<20050203173208.GA23964@foobar.com>';
@ -39,6 +42,7 @@ my $rc = GetOptions("from=s" => \$from,
"in-reply-to=s" => \$initial_reply_to, "in-reply-to=s" => \$initial_reply_to,
"subject=s" => \$initial_subject, "subject=s" => \$initial_subject,
"to=s" => \@to, "to=s" => \@to,
"chain-reply-to!" => \$chain_reply_to,
); );
# Now, let's fill any that aren't set in with defaults: # Now, let's fill any that aren't set in with defaults:
@ -90,6 +94,7 @@ if (!defined $initial_reply_to) {
$term->readline("Message-ID to be used as In-Reply-To? ", $term->readline("Message-ID to be used as In-Reply-To? ",
$initial_reply_to))); $initial_reply_to)));
$initial_reply_to = $_; $initial_reply_to = $_;
$initial_reply_to =~ s/(^\s+|\s+$)//g;
} }
# Now that all the defaults are set, process the rest of the command line # Now that all the defaults are set, process the rest of the command line
@ -119,6 +124,8 @@ Options:
--to Specify the primary "To:" line of the email. --to Specify the primary "To:" line of the email.
--subject Specify the initial "Subject:" line. --subject Specify the initial "Subject:" line.
--in-reply-to Specify the first "In-Reply-To:" header line. --in-reply-to Specify the first "In-Reply-To:" header line.
--chain-reply-to If set, the replies will all be to the first
email sent, rather than to the last email sent.
Error: Please specify a file or a directory on the command line. Error: Please specify a file or a directory on the command line.
EOT EOT
@ -247,7 +254,9 @@ foreach my $t (@files) {
send_message(); send_message();
# set up for the next message # set up for the next message
$reply_to = $message_id; if ($chain_reply_to || length($reply_to) == 0) {
$reply_to = $message_id;
}
make_message_id(); make_message_id();
# $subject = "Re: ".$initial_subject; # $subject = "Re: ".$initial_subject;
} }