Re: [sympa-fr] Prévenir l'auteur en cas d'acceptation du message

[Freddy Levée <adresse@cachée>]

Bonjour,

Pour avoir la fonctionnalité, j'ai rajouté le code suivant dans la fonction 
distribute de Commands.pm:

## Notification de l'auteur
       my @sender_hdr = Mail::Address->parse($msg->head->get('From'));
       my $accepted_sender = $sender_hdr[0]->address;
       my $subject = 
'"'.&MIME::EncWords::decode_mimewords($msg->head->get('subject'), 
Charset=>'utf8').'"';
       unless 
(&report::notice_report_msg('message_distributed',$accepted_sender,{'key' => 
"ayant comme titre ".$subject,'message' => $message},$robot,$list)) {
               ($Log::log_level >= 0) && 
&do_log('err',"Commands::distribute(): Error when sending message %s 
accepted to %s",$msg_id,$accepted_sender);
       }
##

Freddy Levée