Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-01 20:20:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

91_eventTypes.pm: make eventTypes rereadcfg compatible (Forum #117404)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@23471 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2021-01-04 19:24:21 +00:00
parent 3ed1f960fe
commit 9588dee3d4
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
FHEM/91_eventTypes.pm
View File

@ -16,6 +16,7 @@ eventTypes_Initialize($)
$hash->{DefFn} = "eventTypes_Define"; $hash->{DefFn} = "eventTypes_Define";
$hash->{NotifyFn} = "eventTypes_Notify"; $hash->{NotifyFn} = "eventTypes_Notify";
$hash->{ShutdownFn}="eventTypes_Shutdown"; $hash->{ShutdownFn}="eventTypes_Shutdown";
$hash->{UndefFn} = "eventTypes_Undef";
$hash->{GetFn} = "eventTypes_Get"; $hash->{GetFn} = "eventTypes_Get";
$hash->{SetFn} = "eventTypes_Set"; $hash->{SetFn} = "eventTypes_Set";
$hash->{AttrFn} = "eventTypes_Attr"; $hash->{AttrFn} = "eventTypes_Attr";
@ -157,6 +158,13 @@ eventTypes_Attr(@)
} }
################################### ###################################
sub
eventTypes_Undef()
{
delete $modules{eventTypes}{ldata};
return undef;
}
sub sub
eventTypes_Shutdown($$) eventTypes_Shutdown($$)
{ {

2
fhem.pl
View File

@ -1618,7 +1618,7 @@ CommandSetuuid($$)
my ($cl, $param) = @_; my ($cl, $param) = @_;
return "setuuid cannot be used after FHEM is initialized" if($init_done); return "setuuid cannot be used after FHEM is initialized" if($init_done);
my @a = split(" ", $param); my @a = split(" ", $param);
return "Please define $param first" if(!defined($defs{$a[0]})); return "setuuid: Please define $a[0] first" if(!defined($defs{$a[0]}));
return "setuuid $a[0]: duplicate value, ignoring it" if($fuuidHash{$a[1]}); return "setuuid $a[0]: duplicate value, ignoring it" if($fuuidHash{$a[1]});
$fuuidHash{$a[1]} = $a[1]; $fuuidHash{$a[1]} = $a[1];
$defs{$a[0]}{FUUID} = $a[1]; $defs{$a[0]}{FUUID} = $a[1];