From 634712bd739b2a7c5dd5c467e5537be4d7d08bc2 Mon Sep 17 00:00:00 2001 From: short <> Date: Sat, 18 Oct 2003 19:51:12 +0000 Subject: [PATCH] Fixed PerlMail::Config separate namespace. --- perlmail-accept | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perlmail-accept b/perlmail-accept index 0213a48..967a758 100755 --- a/perlmail-accept +++ b/perlmail-accept @@ -314,7 +314,7 @@ sub smssend { my($ignorenewmail,$smscount,%args)=@_; - my $text=audit_sms( + my $text=PerlMail::Config::audit_sms( "subject"=>unmime($Audit->subject()), "from"=>[ Mail::Address->parse(unmime($Audit->from())) ], "body"=>substr(body_simple(),0,$MaxBodySMS*(1+0.25*$smscount)), @@ -476,7 +476,7 @@ my($message)=@_; local @AuditStored=(); do { smssend 0,$opt_smstest; return; } if $opt_smstest; write_message("$Mail/input") or die; - audit(); + PerlMail::Config::audit(); warn 'Corrupted $_, repaired' if defined($save_)!=defined($_) || (defined($_) && $save_ ne $_); } -- 1.8.3.1