From: Jan Schneider <jan@horde.org>
Date: Thu, 5 Nov 2009 10:56:18 +0000 (+0100)
Subject: MFB: Log Sieve communication with DEBUG log level.
X-Git-Url: https://git.internetallee.de/?a=commitdiff_plain;h=ab99f61a4c7233dae135df18cd62b93e961e6832;p=horde.git

MFB: Log Sieve communication with DEBUG log level.
---

diff --git a/ingo/docs/CHANGES b/ingo/docs/CHANGES
index 0fb5491be..1bdae70b9 100644
--- a/ingo/docs/CHANGES
+++ b/ingo/docs/CHANGES
@@ -10,6 +10,7 @@ v2.0-git
 v1.2.3-cvs
 ----------
 
+[jan] Log Sieve communication with DEBUG log level.
 [jan] Fix Oracle SQL scripts.
 [jan] Add Croatian translation (Matej Vela <matej.vela@carnet.hr>).
 [jan] Add PostgreSQL-specific upgrade script (Request #8630).
diff --git a/ingo/lib/Driver/Timsieved.php b/ingo/lib/Driver/Timsieved.php
index d600b8d3b..816c3761e 100644
--- a/ingo/lib/Driver/Timsieved.php
+++ b/ingo/lib/Driver/Timsieved.php
@@ -71,11 +71,23 @@ class Ingo_Driver_Timsieved extends Ingo_Driver
             unset($this->_sieve);
             return $res;
         } else {
+            $this->_sieve->setDebug(true, array($this, '_debug'));
             return true;
         }
     }
 
     /**
+     * Routes the Sieve protocol log to the Horde log.
+     *
+     * @param Net_Sieve $sieve  A Net_Sieve object.
+     * @param string $message   The tracked Sieve communication.
+     */
+    function _debug($sieve, $message)
+    {
+        Horde::logMessage($message, __FILE__, __LINE__, PEAR_LOG_DEBUG);
+    }
+
+    /**
      * Sets a script running on the backend.
      *
      * @param string $script  The sieve script.