git://git.jankratochvil.net
/
PerlMail.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
ef91625
)
&clamscan: Fixed false positive for OpenPGP mails.
author
short
<>
Sat, 5 Mar 2005 08:54:10 +0000
(08:54 +0000)
committer
short
<>
Sat, 5 Mar 2005 08:54:10 +0000
(08:54 +0000)
perlmail-accept
patch
|
blob
|
history
diff --git
a/perlmail-accept
b/perlmail-accept
index
d9a944d
..
5abd067
100755
(executable)
--- a/
perlmail-accept
+++ b/
perlmail-accept
@@
-600,7
+600,9
@@
my($cmd)=@_;
my $err=$?;
$pidcheck && $pidcheck==$pid
or do { cluck "waitpid for $cmd returned $pidcheck!=$pid"; return 0; };
my $err=$?;
$pidcheck && $pidcheck==$pid
or do { cluck "waitpid for $cmd returned $pidcheck!=$pid"; return 0; };
- $status=~s/^stdin: //;
+ $status=~s/^stdin: //mg;
+ # Prevent: LibClamAV Warning: PGP encoded attachment not scanned
+ $status=~s/^.*\bwarning:.*\n//img;
$status=~s/\n$//;
return $status if $status ne "OK" && $status;
return _spamchildcode $err,$status;
$status=~s/\n$//;
return $status if $status ne "OK" && $status;
return _spamchildcode $err,$status;