From b6551e81d246cfe7fa222f70a258a04e607e92d0 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 6 Oct 2019 19:57:47 +0000
Subject: [PATCH] 10_MQTT2_DEVICE.pm: Assign the right IODev (Forum #91394)

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

diff --git a/fhem/FHEM/10_MQTT2_DEVICE.pm b/fhem/FHEM/10_MQTT2_DEVICE.pm
index dbe624a4b..5af660f89 100644
--- a/fhem/FHEM/10_MQTT2_DEVICE.pm
+++ b/fhem/FHEM/10_MQTT2_DEVICE.pm
@@ -63,6 +63,8 @@ MQTT2_DEVICE_Define($$)
   my $name = shift @a;
   my $type = shift @a; # always MQTT2_DEVICE
   $hash->{CID} = shift(@a) if(@a);
+  my $ioname = (@a ? shift(@a) : undef);
+  $hash->{DEF} = ($hash->{CID} ? $hash->{CID} : "") if($hash->{DEF}); #rm ioname
 
   return "wrong syntax for $name: define <name> MQTT2_DEVICE [clientid]"
         if(int(@a));
@@ -79,7 +81,7 @@ MQTT2_DEVICE_Define($$)
     if(!$init_done && !$bridgeTimerStarted);
   $bridgeTimerStarted = 1;
 
-  AssignIoPort($hash);
+  AssignIoPort($hash, $ioname);
   return undef;
 }
 
@@ -88,7 +90,6 @@ sub
 MQTT2_DEVICE_Parse($$)
 {
   my ($iodev, $msg) = @_;
-  my $ioname = $iodev->{NAME};
   my %fnd;
 
   sub
@@ -237,7 +238,7 @@ MQTT2_DEVICE_Parse($$)
     if(!$cidArr || !int(@{$cidArr})) {
       my $devName = $newCid;
       $devName = makeDeviceName($devName);
-      return "UNDEFINED MQTT2_$devName MQTT2_DEVICE $newCid";
+      return "UNDEFINED MQTT2_$devName MQTT2_DEVICE $newCid ".$iodev->{NAME};
     }
     return "";
   }