Zu Compilezeit keine Warnung in DBConnect werfen weil datestyle ungesetzt ist

diff --git a/SL/DBConnect.pm b/SL/DBConnect.pm
index 7d3ea41..9142f1c 100644 (file)
--- a/SL/DBConnect.pm
+++ b/SL/DBConnect.pm
@@ -44,7 +44,7 @@ sub connect {
 
 sub get_datestyle {
   my ($self, $dateformat) = @_;
-  return $dateformat_to_datestyle{ $dateformat || $::myconfig{dateformat} };
+  return $dateformat_to_datestyle{ $dateformat || $::myconfig{dateformat} // '' };
 }
 
 sub get_initial_sql {