X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/18140010cc62b1f1c68a90c61ddb87b50a203f5b..21794e2bd0fbd04915f28eee0ef533b6073fcf50:/SL/DBConnect/Cache.pm?ds=inline diff --git a/SL/DBConnect/Cache.pm b/SL/DBConnect/Cache.pm index 778785ce0..262c113ef 100644 --- a/SL/DBConnect/Cache.pm +++ b/SL/DBConnect/Cache.pm @@ -52,7 +52,7 @@ sub _args2str { map { $_ => $options->{$_} } sort keys %$options; # deterministic order - join ';', apply { s/([;\\])/\\$1/g } $dbconnect, $dbuser, $dbpasswd, $options_str, $initial_sql; + join ';', apply { $_ //= ''; s/([;\\])/\\$1/g } $dbconnect, $dbuser, $dbpasswd, $options_str, $initial_sql; } 1;