From 3293ea8082b8aa63167d112b351272b6334a8f6a Mon Sep 17 00:00:00 2001
From: David Goodwin <david@palepurple.co.uk>
Date: Thu, 8 Nov 2007 18:21:23 +0000
Subject: [PATCH] vacation.pl: do not send a vacation response if the mail has
 been previously classes as spam - assumes /^x-spam-flag:\s+yes$/i matches in
 the message

git-svn-id: https://svn.code.sf.net/p/postfixadmin/code/trunk@203 a1433add-5e2c-0410-b055-b7f2511e0802
---
 VIRTUAL_VACATION/vacation.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/VIRTUAL_VACATION/vacation.pl b/VIRTUAL_VACATION/vacation.pl
index f3aa5431..01c0155b 100644
--- a/VIRTUAL_VACATION/vacation.pl
+++ b/VIRTUAL_VACATION/vacation.pl
@@ -325,6 +325,7 @@ while (<STDIN>) {
    elsif (/^cc:\s+(.*)\n$/i) { $cc = $1; $lastheader = \$cc; }  
    elsif (/^subject:\s+(.*)\n$/i) { $subject = $1; $lastheader = \$subject; }  
    elsif (/^message-id:\s+(.*)\n$/i) { $messageid = $1; $lastheader = \$messageid; }  
+   elsif (/^x-spam-flag:\s+yes$/i) { exit (0); }
    elsif (/^precedence:\s+(bulk|list|junk)/i) { exit (0); }  
    elsif (/^x-loop:\s+postfix\ admin\ virtual\ vacation/i) { exit (0); }  
    else {$lastheader = "" ; }