X-Git-Url: http://git.sthu.org/?a=blobdiff_plain;ds=inline;f=caff%2Fcaff;h=c02ac29893b0baa881cfba73be48ef93e76ffc90;hb=e3ce13585dbe43787f906ce1f03371adf07ba513;hp=1fad0cabfea82c207e75dabaa2052e1747008a24;hpb=5fba3828be118c850ee38edc663c57c11fc5b451;p=pgp-tools.git

diff --git a/caff/caff b/caff/caff
index 1fad0ca..c02ac29 100755
--- a/caff/caff
+++ b/caff/caff
@@ -297,6 +297,7 @@ use File::Path;
 use File::Temp qw{tempdir};
 use Text::Template;
 use MIME::Entity;
+use Encode;
 use Fcntl;
 use IO::Select;
 use Getopt::Long;
@@ -800,7 +801,7 @@ sub send_mail($$$@) {
 
 	$message_entity->head->add("Subject", "Your signed PGP key 0x$key_id");
 	$message_entity->head->add("To", $address);
-	$message_entity->head->add("From", '"'.$CONFIG{'owner'}.'" <'.$CONFIG{'email'}.'>');
+	$message_entity->head->add("From", '"'.Encode::encode('MIME-Q', $CONFIG{'owner'}).'" <'.$CONFIG{'email'}.'>');
 	$message_entity->head->add("Reply-To", $CONFIG{'reply-to'}) if defined $CONFIG{'reply-to'};
 	$message_entity->head->add("Bcc", $CONFIG{'bcc'}) if defined $CONFIG{'bcc'};
 	$message_entity->head->add("User-Agent", $USER_AGENT);