From f9f558f4454288e30726b3ac122f580fa8e622c5 Mon Sep 17 00:00:00 2001 From: betateilchen <> Date: Tue, 20 Oct 2020 07:43:36 +0000 Subject: [PATCH] configDB.pm: fix exclusion list for attributes in save git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@22992 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- configDB.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/configDB.pm b/configDB.pm index 59fb8046e..004da5fd4 100644 --- a/configDB.pm +++ b/configDB.pm @@ -452,6 +452,7 @@ sub cfgDB_SaveCfg { ## prototype used in fhem.pl my ($internal) = shift; $internal = defined($internal) ? $internal : 0; + my $c = "configdb"; my @dontSave = qw(configdb:rescue configdb:nostate configdb:loadversion global:configfile global:version); my (%devByNr, @rowList, %comments, $t, $out); @@ -483,8 +484,9 @@ sub cfgDB_SaveCfg { ## prototype used in fhem.pl foreach my $a (sort keys %{$configDB{attr}}) { my $val = $configDB{attr}{$a}; next unless $val; + next if grep {$_ eq "$c:$a";} @dontSave; $val =~ s/;/;;/g; - push @rowList, "attr configdb $a $val"; + push @rowList, "attr $c $a $val"; } # Insert @rowList into database table