Re: bug ?

[Olivier LACROIX <adresse@cachée>]

Merci à Fabien pour la correction de la date.

Je réponds en partie à mes questions, après mettre penché un peu plus sur le 
code.

* Pour la commande purge qui ne vire pas les abonnés, j'ai trouvé l'erreur. 
Le 
patch est est en fin de message.

* Pour l'authentification systématique, qui se passe pour puge, mais aussi 
pour la commande reconfirm, c'est normal, puisque contrairement à la commande 
add, il n'y a pas de test sur le champ auth (le test est if ($auth_method eq 
'md5'))
Mais est-ce voulu ou un oubli ?

* Pour la commande confirm, a mon avis, il faut la reprendre entièrement. Si 
j'ai bien lu le code :
en tapant "confirm liste adresse", n'importe qui (même non abonné) devrait 
être susceptible de confirmer l'abonnement de quelqu'un
une des commandes do_log a 3 paramètres, mais seuls les 2 premiers sont 
utilisés.


*** Commands.pm.orig2   Mon Feb  2 17:44:41 1998
--- Commands.pm Fri Mar 27 16:12:00 1998
***************
*** 260,266 ****
        print "   $i{'email'}\n";
        $k = sprintf(Msg(6, 17, $msg::purge_done), $which);
        mail::mailback(\$k, sprintf(Msg(6, 18, $msg::subj_purge_done), 
$which), $i{'email'}) unless ($quiet);
!       push(@i, $i);
     }
     do_log('info', Msg(7, 9, 'PURGE for %s from %s'), $which, $sender);
     $list->delete_user(@i);
--- 260,266 ----
        print "   $i{'email'}\n";
        $k = sprintf(Msg(6, 17, $msg::purge_done), $which);
        mail::mailback(\$k, sprintf(Msg(6, 18, $msg::subj_purge_done), 
$which), $i{'email'}) unless ($quiet);
!       push(@i, $i{'email'});
     }
     do_log('info', Msg(7, 9, 'PURGE for %s from %s'), $which, $sender);
     $list->delete_user(@i);

-- 

 Olivier LACROIX

 C.I.R.I.L.
 Chateau du Montet      |  Tel   : +33 3.83.44.74.29
 Rue du Doyen Roubault  |  Fax   : +33 3.83.44.02.62
 F - 54500 VANDOEUVRE   |  email : adresse@cachée