|
From: Stefano Z. <ste...@ya...> - 2004-07-05 11:25:36
|
Il lun, 2004-07-05 alle 11:59, Fanton Flavio ha scritto:
> Il problema è stato risolto con una modifica al modulo Opec::Receipt.pm aggiornato su CVS e verrà introdotta nella 1.0.0RC2, in particolare:
>
> - my @allRcpt = @{$trasportMsg->recips()};
>
> + my @allRcpt = grep { exists $hLocalCertDomains{substr(
> + (splitAddress($_->mailAddress))[1],1)} }
> + @{$trasportMsg->recips()};
>
> In ogni caso allego il modulo corretto da sostituire al vecchio.
io avevo risolto (con una mano da parte di Roberto Rambaldi) con un piu'
grezzo :
my $QuelloACuiArriva=$objRcpt->mailAddress();
map { next unless ($orig_sender=~m/@\Q$_\E/i && $QuelloACuiArriva!~m/@\Q$_\E/i) } @localCertDomains;
(sempre all'inizio del " foreach my $objRcpt")
> Grazie Stefano.
> - flazan
figurati ....
ora ho finito i test,se vi interessa potete aggiungere anche suse 9.0
alla lista delle distribuzioni testate.
saluti
|