From d82ecd38ecbee467e5527a3190bd029233d5c8c7 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 6 Oct 2019 20:14:49 +0000
Subject: [PATCH] FHEM/10_MQTT2_DEVICE.pm: add $CID for readingsList eval
 (Forum #101216)

git-svn-id: https://svn.fhem.de/fhem/trunk@20324 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_MQTT2_DEVICE.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fhem/FHEM/10_MQTT2_DEVICE.pm b/fhem/FHEM/10_MQTT2_DEVICE.pm
index 5af660f89..23459754c 100644
--- a/fhem/FHEM/10_MQTT2_DEVICE.pm
+++ b/fhem/FHEM/10_MQTT2_DEVICE.pm
@@ -134,7 +134,7 @@ MQTT2_DEVICE_Parse($$)
       if($code =~ m/^{.*}$/s) {
         $code = EvalSpecials($code, ("%TOPIC"=>$topic, "%EVENT"=>$value,
                  "%DEVICETOPIC"=>$hash->{DEVICETOPIC}, "%NAME"=>$hash->{NAME},
-                 "%JSONMAP","\$defs{$dev}{JSONMAP}"));
+                 "%CID"=>$cid, "%JSONMAP","\$defs{$dev}{JSONMAP}"));
         my $ret = AnalyzePerlCommand(undef, $code);
         if($ret && ref $ret eq "HASH") {
           readingsBeginUpdate($hash);