]> asedeno.scripts.mit.edu Git - git.git/blobdiff - git-send-email.perl
Merge branch 'master' of git://repo.or.cz/git/fastimport
[git.git] / git-send-email.perl
index ae50990d081c3709c0a498422be382b9a632f5ec..d6b15480dc1e211f0653ff54963889464dad3573 100755 (executable)
@@ -446,9 +446,12 @@ sub send_message
                my ($name, $addr) = ($from =~ /^(.*?)(\s+<.*)/);
                $from = "\"$name\"$addr";
        }
+       my $ccline = "";
+       if ($cc ne '') {
+               $ccline = "\nCc: $cc";
+       }
        my $header = "From: $from
-To: $to
-Cc: $cc
+To: $to${ccline}
 Subject: $subject
 Date: $date
 Message-Id: $message_id
@@ -595,7 +598,7 @@ foreach my $t (@files) {
        if ($chain_reply_to || !defined $reply_to || length($reply_to) == 0) {
                $reply_to = $message_id;
                if (length $references > 0) {
-                       $references .= " $message_id";
+                       $references .= "\n $message_id";
                } else {
                        $references = "$message_id";
                }