From 165ade23ef931d4494c585fdd07852d58b2daa39 Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Sun, 8 Apr 2018 09:44:42 +0000 Subject: [PATCH] SetExternsions.pm: fix toggle when eventMap is used. git-svn-id: https://svn.fhem.de/fhem/trunk@16568 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/SetExtensions.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/fhem/FHEM/SetExtensions.pm b/fhem/FHEM/SetExtensions.pm index 5d33609e4..1bd64d6cd 100644 --- a/fhem/FHEM/SetExtensions.pm +++ b/fhem/FHEM/SetExtensions.pm @@ -60,8 +60,9 @@ SetExtensions($$@) my $hasOn = ($list =~ m/(^| )on\b/); my $hasOff = ($list =~ m/(^| )off\b/); + my $eventMap = AttrVal($name, "eventMap", undef); - if((!$hasOn || !$hasOff) && AttrVal($name, "eventMap", undef)) { + if((!$hasOn || !$hasOff) && $eventMap) { if(!$hasOn) { my (undef,$value) = ReplaceEventMap($name, [$name, "on"], 0); $hasOn = ($value ne "on"); @@ -169,6 +170,8 @@ SetExtensions($$@) } elsif($cmd eq "toggle") { my $value = Value($name); + (undef,$value) = ReplaceEventMap($name, [$name, $value], 0) if($eventMap); + $value = ($1==0 ? "off" : "on") if($value =~ m/dim (\d+)/); # Forum #49391 SE_DoSet($name, $value =~ m/^on/ ? "off" : "on");