[Pgp-tools-commit] r756 - trunk/caff

[Guilhem Moulin]

Author: guilhem-guest
Date: 2015-01-13 21:35:56 +0000 (Tue, 13 Jan 2015)
New Revision: 756

Modified:
   trunk/caff/caff
Log:
caff: Allow multiple expansions in 'mail-subject'.

Modified: trunk/caff/caff
===================================================================
--- trunk/caff/caff	2015-01-03 18:54:28 UTC (rev 755)
+++ trunk/caff/caff	2015-01-13 21:35:56 UTC (rev 756)
@@ -929,7 +929,7 @@
 
 	$message_entity->head->add("From", Encode::encode('MIME-Q', $CONFIG{'owner'}).' <'.$CONFIG{'email'}.'>');
 	$message_entity->head->add("Date", strfCtime("%a, %e %b %Y %H:%M:%S %z", localtime));
-	$message_entity->head->add("Subject", Encode::encode('MIME-Q', $CONFIG{'mail-subject'} =~ s/%k/$key_id/r));
+	$message_entity->head->add("Subject", Encode::encode('MIME-Q', $CONFIG{'mail-subject'} =~ s/%k/$key_id/gr));
 	$message_entity->head->add("To", email_to_ascii($address));
 	$message_entity->head->add("Sender", Encode::encode('MIME-Q', $CONFIG{'owner'}).' <'.$CONFIG{'email'}.'>');
 	$message_entity->head->add("Reply-To", $CONFIG{'reply-to'}) if defined $CONFIG{'reply-to'};