From 4c00ddc6691ba823a287e8f0b1c38ae6aa724d0c Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 26 Nov 2023 10:50:43 +0000
Subject: [PATCH] 10_FBDECT.pm: better cleanup after delete (Forum 135948)

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

diff --git a/fhem/FHEM/10_FBDECT.pm b/fhem/FHEM/10_FBDECT.pm
index 3a6bd47c8..027d228ec 100644
--- a/fhem/FHEM/10_FBDECT.pm
+++ b/fhem/FHEM/10_FBDECT.pm
@@ -844,8 +844,9 @@ sub
 FBDECT_Undef($$)
 {
   my ($hash, $arg) = @_;
-  my $homeId = $hash->{homeId};
+  my $iodev = $hash->{IODev};
   my $id = $hash->{id};
+  delete $modules{FBDECT}{defptr}{"$iodev->{NAME}:$id"} if($iodev && ref($iodev) eq "HASH");
   delete $modules{FBDECT}{defptr}{$id};
   return undef;
 }