From 05a74f95c78f9ec5888859bb73939128ec5bb135 Mon Sep 17 00:00:00 2001
From: Chris <chris@starforge.co.uk>
Date: Sun, 12 Jan 2014 11:57:29 +0000
Subject: [PATCH] Confirm syslog is enabled.

---
 Webperl/Logger.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Webperl/Logger.pm b/Webperl/Logger.pm
index 1f6ac51..0472002 100644
--- a/Webperl/Logger.pm
+++ b/Webperl/Logger.pm
@@ -87,6 +87,8 @@ sub new {
         if($@) {
             $obj -> {"syslog"} = 0;
             $obj -> warn_log(undef, "Unable to conenct to syslog: $@");
+        } else {
+            syslog(LOG_INFO, "Syslog started");
         }
     }