remote-hg: add basic tests

diff --git a/git-send-email.perl b/git-send-email.perl
index 607137b9aaf5e3ea1a7f7f8e4b412afae2f2c320..aea66a0d47a9ad64fe805351c631fe5fddbf6182 100755 (executable)
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -759,7 +759,8 @@ sub file_declares_8bit_cte {
 }
 
 if (!@initial_to && !defined $to_cmd) {
-       my $to = ask("Who should the emails be sent to? ",
+       my $to = ask("Who should the emails be sent to (if any)? ",
+                    default => "",
                     valid_re => qr/\@.*\./, confirm_only => 1);
        push @initial_to, parse_address_line($to) if defined $to; # sanitized/validated later
        $prompting++;
@@ -786,7 +787,8 @@ sub expand_one_alias {
 
 if ($thread && !defined $initial_reply_to && $prompting) {
        $initial_reply_to = ask(
-               "Message-ID to be used as In-Reply-To for the first email? ",
+               "Message-ID to be used as In-Reply-To for the first email (if any)? ",
+               default => "",
                valid_re => qr/\@.*\./, confirm_only => 1);
 }
 if (defined $initial_reply_to) {