SL::DB _register_db Passwort aus $type herausfiltern

Es wurde nach dem falschen String gefiltert.

diff --git a/SL/DB.pm b/SL/DB.pm
index c678ed14fca81bf8125787b9c2c6b9c73623a06d..60681c7e694d4a05e90731d54252ea679de15912 100644 (file)
--- a/SL/DB.pm
+++ b/SL/DB.pm
@@ -93,7 +93,7 @@ sub _register_db {
   my %flattened_settings = _flatten_settings(%connect_settings);
 
   $domain                = 'KIVITENDO' if $type =~ m/^KIVITENDO/;
-  $type                 .= join($SUBSCRIPT_SEPARATOR, map { ($_, $flattened_settings{$_} || '') } sort grep { $_ ne 'dbpasswd' } keys %flattened_settings);
+  $type                 .= join($SUBSCRIPT_SEPARATOR, map { ($_, $flattened_settings{$_} || '') } sort grep { $_ ne 'password' } keys %flattened_settings);
   my $idx                = "${domain}::${type}";
 
   if (!$_db_registered{$idx}) {