clone: the given repository dir should be relative to $PWD

diff --git a/git-send-email.perl b/git-send-email.perl
index 1e2777c8e2bb27f092e987ffde532cb441bd06a1..3f50abaeb6901772b22e6ca2c1e87b4bd92f3b92 100755 (executable)
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -488,7 +488,7 @@ sub send_message
                                        if ($2 eq $from) {
                                                next if ($suppress_from);
                                        }
-                                       else {
+                                       elsif ($1 eq 'From') {
                                                $author_not_sender = $2;
                                        }
                                        printf("(mbox) Adding cc: %s from line '%s'\n",
@@ -538,7 +538,7 @@ sub send_message
        send_message();
 
        # set up for the next message
-       if ($chain_reply_to || length($reply_to) == 0) {
+       if ($chain_reply_to || !defined $reply_to || length($reply_to) == 0) {
                $reply_to = $message_id;
                if (length $references > 0) {
                        $references .= " $message_id";