From 8ac6157ee8303042e1c2fd15aeb22f93c7d0730d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ask=20Bj=C3=B8rn=20Hansen?= <ask@develooper.com>
Date: Fri, 16 Dec 2005 22:27:27 +0000
Subject: [PATCH]  r2614@g5:  ask | 2005-12-16 14:27:01 -0800    Make the
 clamdscan plugin temporarily deny mail if if can't talk to clamd    (Filippo
 Carletti)

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@587 958fd67b-6ff1-0310-b445-bb7760255be9
---
 Changes                 | 6 ++++++
 plugins/virus/clamdscan | 2 +-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/Changes b/Changes
index 4b5a02e..2d0eabd 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,9 @@
+0.40
+
+  Make the clamdscan plugin temporarily deny mail if if can't talk to clamd
+  (Filippo Carletti)
+
+
 0.31 -
 
   qpsmtpd-forkserver: --listen-address may now be given more than once, to
diff --git a/plugins/virus/clamdscan b/plugins/virus/clamdscan
index 1c35626..569b044 100644
--- a/plugins/virus/clamdscan
+++ b/plugins/virus/clamdscan
@@ -153,7 +153,7 @@ sub hook_data_post {
         $clamd = Clamd->new();    # default unix domain socket
     }
 
-    return (DECLINED) unless $clamd->ping();
+    return (DENYSOFT) unless $clamd->ping();
 
     if ( my %found = $clamd->scan($filename) ) {
         my $viruses = join( ",", values(%found) );