From c35352bb6c8eb4323ebbea81837ee8acc148fde9 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sat, 24 Nov 2018 15:24:30 +0000
Subject: [PATCH] 10_MQTT2_DEVICE.pm: autocreate readingsList adds prefix to
 json (Forum #93642)

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

diff --git a/fhem/FHEM/10_MQTT2_DEVICE.pm b/fhem/FHEM/10_MQTT2_DEVICE.pm
index 15e8511fa..76cd8c12b 100644
--- a/fhem/FHEM/10_MQTT2_DEVICE.pm
+++ b/fhem/FHEM/10_MQTT2_DEVICE.pm
@@ -159,7 +159,11 @@ MQTT2_DEVICE_Parse($$)
       my $add;
       if($value =~ m/^{.*}$/) {
         my $ret = json2nameValue($value);
-        $add = "{ json2nameValue(\$EVENT) }" if(keys %{$ret});
+        if(keys %{$ret}) {
+          $topic =~ m,.*/([^/]+),;
+          my $prefix = $1 ? "${1}_" : "";
+          $add = "{ json2nameValue(\$EVENT, '$prefix') }";
+        }
       }
       if(!$add) {
         $topic =~ m,.*/([^/]+),;