summaryrefslogtreecommitdiff
path: root/git-send-email-script
diff options
context:
space:
mode:
authorLibravatar Ryan Anderson <ryan@michonline.com>2005-07-31 20:04:24 -0400
committerLibravatar Junio C Hamano <junkio@cox.net>2005-08-02 22:53:16 -0700
commit9133261f1e1be3409eebdfcc90a9c11ff942240c (patch)
tree3c8aa95f2630bdc8322947cdb6cb12585cf2b3dc /git-send-email-script
parent[PATCH] Add new dependencies caused by git-send-email-script to debian/control (diff)
downloadtgif-9133261f1e1be3409eebdfcc90a9c11ff942240c.tar.xz
[PATCH] Convert from using quoted-printable to just 8bit encoding on all emails.
(Deleted some spurious comments) Signed-off-by: Ryan Anderson <ryan@michonline.com> Signed-off-by: Junio C Hamano <junkio@cox.net>
Diffstat (limited to 'git-send-email-script')
-rwxr-xr-xgit-send-email-script16
1 files changed, 3 insertions, 13 deletions
diff --git a/git-send-email-script b/git-send-email-script
index 9061ecdf5b..c0d9eb8f19 100755
--- a/git-send-email-script
+++ b/git-send-email-script
@@ -21,7 +21,7 @@
use strict;
use warnings;
use Term::ReadLine;
-use Mail::Sendmail;
+use Mail::Sendmail qw(sendmail %mailcfg);
use Getopt::Long;
use Data::Dumper;
use Email::Valid;
@@ -29,19 +29,8 @@ use Email::Valid;
# Variables we fill in automatically, or via prompting:
my (@to,@cc,$initial_reply_to,$initial_subject,@files,$from);
-# Example of them
-# modify these options each time you run the script
-#$to = 'torvalds@osdl.org,git@vger.kernel.org';
+# Example reply to:
#$initial_reply_to = ''; #<20050203173208.GA23964@foobar.com>';
-#$initial_subject = "[PATCH] Deb package build fixes";
-#@files = (qw(
-#0001-Make-debian-rules-executable-and-correct-the-spelling-of-rsync-in.txt
-#0002-Debian-packages-should-include-the-binaries.txt
-#0003-The-deb-package-building-needs-these-two-new-files-to-work-correctly.txt
-#));
-
-# change this to your email address.
-#$from = "Ryan Anderson <ryan\@michonline.com>";
my $term = new Term::ReadLine 'git-send-email';
@@ -180,6 +169,7 @@ sub send_message
);
$mail{smtp} = 'localhost';
+ $mailcfg{mime} = 0;
#print Data::Dumper->Dump([\%mail],[qw(*mail)]);