From 08f37bb6adf63fd8f739c10432dfb47ce3bf8c01 Mon Sep 17 00:00:00 2001
From: David Goodwin <david@palepurple.co.uk>
Date: Sat, 26 Sep 2009 08:17:03 +0000
Subject: [PATCH] vacation.pl: change syslog facility

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

diff --git a/VIRTUAL_VACATION/vacation.pl b/VIRTUAL_VACATION/vacation.pl
index 7d215e86..eefbab57 100644
--- a/VIRTUAL_VACATION/vacation.pl
+++ b/VIRTUAL_VACATION/vacation.pl
@@ -213,7 +213,7 @@ if($test_mode == 1) {
     if($syslog == 1) {
         my $syslog_appender = Log::Log4perl::Appender->new(
             'Log::Dispatch::Syslog',
-            Facility => 'user',
+            Facility => 'mail',
         );
         $logger->add_appender($syslog_appender);
     }
@@ -282,7 +282,7 @@ sub already_notified {
             my @row = $stm->fetchrow_array;
             my $int = $row[0];
             if ($int > $interval) {
-                $logger->debug("[Interval elapsed, sending the message]: From: $from To:$to");
+                $logger->info("[Interval elapsed, sending the message]: From: $from To:$to");
                 $query = qq{UPDATE vacation_notification SET notified_at=NOW() WHERE on_vacation=? AND notified=?};
                 $stm = $dbh->prepare($query);
                 if (!$stm) {