From bbcba3f90e1f82e8e09ee9d1ea9a28056ec08597 Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Wed, 9 Jan 2013 09:14:30 +0000 Subject: [PATCH] HUP missed to call UndefFn in RereadCfg git-svn-id: https://svn.fhem.de/fhem/trunk@2459 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/fhem.pl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/fhem/fhem.pl b/fhem/fhem.pl index f8fb9beb7..565aa1242 100755 --- a/fhem/fhem.pl +++ b/fhem/fhem.pl @@ -898,7 +898,7 @@ sub CommandRereadCfg($$) { my ($cl, $param) = @_; - my $name = $cl->{NAME} if($cl); + my $name = ($cl ? $cl->{NAME} : "__anonymous__"); my $cfgfile = ($param ? $param : $attr{global}{configfile}); return "Cannot open $cfgfile: $!" if(! -f $cfgfile); @@ -907,7 +907,6 @@ CommandRereadCfg($$) $reread_active=1; $init_done = 0; - foreach my $d (sort { $defs{$b}{NR} <=> $defs{$a}{NR} } keys %defs) { my $ret = CallFn($d, "UndefFn", $defs{$d}, $d) if($name && $name ne $d); @@ -932,7 +931,7 @@ CommandRereadCfg($$) $ret = (defined($ret) ? "$ret\n$ret2" : $ret2) if(defined($ret2)); } DoTrigger("global", "REREADCFG"); - $defs{$name} = $selectlist{$name} = $cl if($name); + $defs{$name} = $selectlist{$name} = $cl if($name && $name ne "__anonymous__"); $init_done = 1; $reread_active=0;