Make klez filter run for mails bigger than 220KB; they are sometimes
bigger than that. git-svn-id: https://svn.perl.org/qpsmtpd/trunk@77 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
499d1e6a4c
commit
e342c0b9b2
5
Changes
5
Changes
@ -1,3 +1,8 @@
|
||||
2002/09/22
|
||||
Make klez filter run for mails bigger than 220KB; they are sometimes
|
||||
bigger than that.
|
||||
|
||||
|
||||
2002/09/20
|
||||
Avoid "use of uninitialized variable" warning when the "MAIL" or the
|
||||
"RCPT" command is executed without a parameter.
|
||||
|
@ -6,10 +6,11 @@ sub register {
|
||||
sub check_klez {
|
||||
my ($self, $transaction) = @_;
|
||||
|
||||
# klez files are always around 140K
|
||||
# klez files are always sorta big .. how big? Dunno.
|
||||
return (DECLINED)
|
||||
if $transaction->body_size < 60_000
|
||||
or $transaction->body_size > 220_000;
|
||||
if $transaction->body_size < 60_000;
|
||||
# 220k was too little, so let's just disable the "big size check"
|
||||
# or $transaction->body_size > 1_000_000;
|
||||
|
||||
# maybe it would be worthwhile to add a check for
|
||||
# Content-Type: multipart/alternative; here?
|
||||
|
Loading…
Reference in New Issue
Block a user