Prefix Dry- to the message status to denote dry-runs.

[git.git] / git-send-email.perl

diff --git a/git-send-email.perl b/git-send-email.perl
index 5e38a97cb62703f10b242111376ca26ee5888944..50d45fe00547e7ab784e095025c15ba2c51064ba 100755 (executable)
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -488,9 +488,9 @@ X-Mailer: git-send-email $gitversion
                $smtp->ok or die "Failed to send $subject\n".$smtp->message;
        }
        if ($quiet) {
-               printf "Sent %s\n", $subject;
+               printf (($dry_run ? "Dry-" : "")."Sent %s\n", $subject);
        } else {
-               print "OK. Log says:\nDate: $date\n";
+               print (($dry_run ? "Dry-" : "")."OK. Log says:\nDate: $date\n");
                if ($smtp) {
                        print "Server: $smtp_server\n";
                } else {