[PATCH] git-send-email.perl: Add angle brackets to In-Reply-To if necessary
Signed-off-by: David Kastrup <dak@gnu.org>
---
I have not actually tested this, but from staring at it intensively,
it should be correct. One of the things that bit me when I tried
using this program.
git-send-email.perl | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/git-send-email.perl b/git-send-email.perl
index 69559b2..877f74c 100755
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -309,7 +309,8 @@ if ($thread && !defined $initial_reply_to && $prompting) {
} while (!defined $_);
$initial_reply_to = $_;
- $initial_reply_to =~ s/(^\s+|\s+$)//g;
+ $initial_reply_to =~ s/^\s+<?/</;
+ $initial_reply_to =~ s/>?\s+$/>/;
}
if (!$smtp_server) {
--
1.5.3.rc2.187.g9a1d2-dirty
David Kastrup <dak@gnu.org>