2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00

fhem.pl: fix hashKeyRename Warning for undefined value (Forum #109566)

git-svn-id: https://svn.fhem.de/fhem/trunk@21524 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2020-03-27 10:22:34 +00:00
parent 0297a03a24
commit cafaf69b14

View File

@ -5256,7 +5256,8 @@ hashKeyRename($$$)
my ($hash, $r1, $r2) = @_;
my (%repl, %ret);
for my $k (keys %{$hash}) {
$repl{$1} = $2 if("$k:$hash->{$k}" =~ m/$r1/ && defined($1) && defined($2));
$repl{$1} = $2 if(defined($hash->{$k}) &&
"$k:$hash->{$k}" =~ m/$r1/ && defined($1) && defined($2));
}
for my $k (keys %{$hash}) {
my $val = $hash->{$k};