Config option for Bccing the sender. Thanks to Joost van Baal.

[pgp-tools.git] / caff / caff

diff --git a/caff/caff b/caff/caff
index 532a01251e1b27f759f720b242baef0a13fecdc7..59ee3b8dcae3e4813fdb9417e6885a26c8c31712 100755 (executable)
--- a/caff/caff
+++ b/caff/caff
@@ -176,6 +176,11 @@ The UIDs for which signatures are included in the mail.
 
 =back
 
+=item B<bcc> [string]
+
+Address to send blind carbon copies to when sending mail.
+Default: none.
+
 =back
 
 =head1 AUTHOR
@@ -555,6 +560,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("Bcc", $CONFIG{'bcc'}) if defined $CONFIG{'bcc'};
        $message_entity->head->add("User-Agent", $USER_AGENT);
        $message_entity->send();
        $message_entity->stringify();