X-Git-Url: http://git.equinoxoli.org/?p=koha-equinox.git;a=blobdiff_plain;f=Koha%2FLogger.pm;h=39e8ba3e9fe98b7a52cfd74547ff38ff0306cc0f;hp=ed85c99d72916fc300b6d5dbaefbb794d2a3b50f;hb=03c03ed8cdb94cda4cfd661e3b04f97cb36d8dc4;hpb=0bb1e01a0c553c18953be9799329128700e2d42b

diff --git a/Koha/Logger.pm b/Koha/Logger.pm
index ed85c99..39e8ba3 100644
--- a/Koha/Logger.pm
+++ b/Koha/Logger.pm
@@ -159,11 +159,14 @@ sub _check_conf {    # check logfiles in log4perl config (at initialization)
         if ( $l =~ /(OPAC|INTRANET)\.filename\s*=\s*(.*)\s*$/i ) {
 
             # we only check the two default logfiles, skipping additional ones
-            return if !-w $2;
+            if ( !-w $2 ) {
+                warn "Log file $2 is not writable!";
+                return;
+            };
             push @logs, $1 . ':' . $2;
         }
     }
-    return if !@logs;    # we should find one
+    return unless @logs; # we should find one
     return \@logs;
 }