FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 12:49:34 +00:00
Code Issues Releases Wiki Activity

98_DOIF.pm: $hs=$hash in CmdDoIfPerl for subs block, delete timer reading in DOIF_ExecTimer moved forward

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@17677 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
Damian 2018-11-04 21:09:59 +00:00
parent f865ab0821
commit 946d046a33
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
fhem/FHEM/98_DOIF.pm
View File

@ -2837,7 +2837,7 @@ CmdDoIfPerl($$)
my $ret;
my $err="";
my $i=0;
$hs=$hash;
#def modify
if ($init_done)
{
@ -3296,6 +3296,7 @@ sub DOIF_ExecTimer
my $subname=${$timer}->{subname};
my $param=${$timer}->{param} if (defined ${$timer}->{param});
$hs=$hash;
delete ($::defs{$name}{READINGS}{"timer_$timername"});
if (!defined ($param)) {
eval ("package DOIF;$subname");
} else {
@ -3306,7 +3307,6 @@ sub DOIF_ExecTimer
::Log3 ($::defs{$name}{NAME},1 , "$name error in $subname: $@");
::readingsSingleUpdate ($hash, "error", "in $subname: $@",0);
}
delete ($::defs{$name}{READINGS}{"timer_$timername"});
}
sub set_Exec
@ -6069,7 +6069,7 @@ subs {<br>
&nbsp;&nbsp;&nbsp;&nbsp;set_Exec ("$window",1800,"logwin",$window);&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;# setze Timer auf 30 Minuten für eine wiederholte Meldung<br>
&nbsp;&nbsp;}<br>
}<br>
{ if (["_window$:open"]) {set_Exec ("$DEVICE",600,'logwin("$DEVICE")')}} # wenn, Fenster geöffnet wird, dann setze Timer auf Funktion zum Loggen namens "logwin"<br>
{ if (["_window$:open"]) {set_Exec ("$DEVICE",600,'logwin',"$DEVICE")}} # wenn, Fenster geöffnet wird, dann setze Timer auf Funktion zum Loggen namens "logwin"<br>
{ if (["_window$:closed"]) {del_Exec ("$DEVICE")}}&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; # wenn, Fenster geschlossen wird, dann lösche Timer<br>
</code>
</ul>