From df8335a8503271cf9dbe13243f4893c40c832719 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sat, 21 Dec 2019 18:52:09 +0000
Subject: [PATCH] 91_sequence.pm: set $data{sequence_source} (Forum #71671)

git-svn-id: https://svn.fhem.de/fhem/trunk@20796 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/91_sequence.pm | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/91_sequence.pm b/fhem/FHEM/91_sequence.pm
index 8a5d8d720..c6b97dbff 100644
--- a/fhem/FHEM/91_sequence.pm
+++ b/fhem/FHEM/91_sequence.pm
@@ -100,7 +100,9 @@ sequence_Notify($$)
 
       Log3 $ln, 5, "sequence $ln $tt";
       setReadingsVal($hash, "state", "active", TimeNow());
+      $data{sequence_source} = $dev->{NAME};
       DoTrigger($ln, $tt);
+      delete($data{sequence_source});
       $idx  = 0;
       $hash->{TS} = 0;
 
@@ -199,7 +201,9 @@ sequence_Undef($$)
       define lampseq sequence Btn1:on 2:3 Btn1:off<br>
       </code>
     </ul>
-    sequence will be triggerred if Btn1 is pressed for 2 to 5 seconds.
+    sequence will be triggerred if Btn1 is pressed for 2 to 5 seconds.<br>
+    Note: the global variable $data{sequence_source} is set to the name of the
+    device triggering the last event.
   </ul>
   <br>
 
@@ -289,7 +293,9 @@ sequence_Undef($$)
       </code>
     </ul>
     ist nur erfolgreich, falls Btn1 zwischen 2 und 5 Sekunden lang gedr&uuml;ckt
-    wurde.
+    wurde.<br>
+    Die globale Variable $data{sequence_source} wird auf dem Namen des
+    Ger&auml;tes gesetzt, was den letzten Event ausgel&ouml;st hat.
   </ul>
   <br>