[Mimedefang] limit Recipients for auth user

[Roman Pretory]

Hello Benoît

Thanks for your answer.
Are you sure that you forgot notthing from your code??

Because i try and it don't work :-(
I need at first only to log.

The parts I used below:

if ($Features{"SpamAssassin"}) {
    spam_assassin_init()->compile_now(1) if defined(spam_assassin_init());
}

require ("/etc/mail/mimedefang-config");
++require Storable;
....
++sub store_vars {
++         my($vars) = @_;
++         Storable::store($vars, 'vars.db'); }

++sub load_vars {
++         my $vars = {};
++         if(-f 'vars.db') {
 ++                $vars = Storable::retrieve('vars.db');
++         }
 ++        return $vars;
++}

...
sub filter_recipient{
	($recipient, $sender, $ip, $name, $firstRecip, $helo, $rcpt_mailer, $rcpt_host, $rcpt_addr)= @_;
	read_commands_file();
++  my $vars=&load_vars();
++if(!defined($vars->{imp_rcpt_count})) {$vars->{imp_rcpt_count}=1;  }
++  md_syslog 'info', "COUNT  RECIPIENT:  ".$vars->{imp_rcpt_count};

Thanks
RP