From: David Kastrup <dak@gnu.org>
Date: Wed, 12 Sep 2007 05:53:45 +0000 (+0200)
Subject: git-send-email.perl: Add angle brackets to In-Reply-To if necessary
X-Git-Tag: v1.5.3.2~31
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=3803bcea;p=git.git

git-send-email.perl: Add angle brackets to In-Reply-To if necessary

Although message-id by defintion should have surrounding angle
brackets, there is no point forcing people to type them in.

Signed-off-by: David Kastrup <dak@gnu.org>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
---

diff --git a/git-send-email.perl b/git-send-email.perl
index e0b7d1245..195fe6f70 100755
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -317,7 +317,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) {