From 5c886d92102c1f897e498d10fa6f58948f06ac78 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Mon, 16 Jan 2012 18:35:57 +0100
Subject: [PATCH] =?utf8?q?SL::DB:=20Eine=20Warning=20unterdr=C3=BCcken?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit
---
SL/DB.pm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/SL/DB.pm b/SL/DB.pm
index 55428615f..861fe6a52 100644
--- a/SL/DB.pm
+++ b/SL/DB.pm
@@ -67,7 +67,8 @@ sub _register_db {
} else {
my $european_dates = 0;
if ($::myconfig{dateformat}) {
- $european_dates = 1 if $_dateformats{ $::myconfig{dateformat} } =~ m/european/i;
+ $european_dates = 1 if $_dateformats{ $::myconfig{dateformat} }
+ && $_dateformats{ $::myconfig{dateformat} } =~ m/european/i;
}
%connect_settings = ( driver => $::myconfig{dbdriver} || 'Pg',
--
2.20.1