From e30975450b7fa80d4e70a5f93beb41e055e5da50 Mon Sep 17 00:00:00 2001
From: Chris <chris@starforge.co.uk>
Date: Sun, 12 Jan 2014 12:04:50 +0000
Subject: [PATCH] Need -> !

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

diff --git a/Webperl/Logger.pm b/Webperl/Logger.pm
index 2da64d5..bc98625 100644
--- a/Webperl/Logger.pm
+++ b/Webperl/Logger.pm
@@ -270,7 +270,7 @@ sub print {
         print $self -> {"outlevels"} -> [$level],": $message",($newline ? "\n" : "");
         print $logfile $self -> {"outlevels"} -> [$level],": $message",($newline ? "\n" : "") if($logfile);
 
-        syslog(lc($self {"outlevels"} -> [$level]), $message)
+        syslog(lc($self -> {"outlevels"} -> [$level]), $message)
             if(!$self -> {"syslog"});
 
         # flush stdout if needed to avoid log update delays