From 8c5870df4878430f3165fcdfe0ffca6c3927ae32 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Sat, 26 Oct 2019 09:05:19 +0000
Subject: [PATCH] 98_structure.pm: Fix addstruct/delstruct issues (Forum
 #104785)

git-svn-id: https://svn.fhem.de/fhem/trunk@20409 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/98_structure.pm | 14 ++++++--------
 1 file changed, 6 insertions(+), 8 deletions(-)

diff --git a/fhem/FHEM/98_structure.pm b/fhem/FHEM/98_structure.pm
index 60a56d914..63ccb4516 100644
--- a/fhem/FHEM/98_structure.pm
+++ b/fhem/FHEM/98_structure.pm
@@ -341,13 +341,12 @@ CommandAddStruct($)
   }
 
   foreach my $d (devspec2array($a[0])) {
-    $hash->{".memberHash"}{$d} = 1;
     $hash->{DEF} .= " $d";
+    CommandAttr($cl, "$d $hash->{ATTR} $hash->{NAME}");
   }
 
-  @a = ( "set", $hash->{NAME}, $hash->{ATTR}, $hash->{NAME} );
-  structure_Attr(@a);
-  delete $hash->{".cachedHelp"};
+  addStructChange("addstruct", $name, $param);
+  structure_setDevs($hash);
   return undef;
 }
 
@@ -369,14 +368,13 @@ CommandDelStruct($)
   }
 
   foreach my $d (devspec2array($a[0])) {
-    delete($hash->{".memberHash"}{$d});
     $hash->{DEF} =~ s/\b$d\b//g;
+    CommandDeleteAttr($cl, "$d $hash->{ATTR}");
   }
   $hash->{DEF} =~ s/  / /g;
 
-  @a = ( "del", $hash->{NAME}, $hash->{ATTR} );
-  structure_Attr(@a);
-  delete $hash->{".cachedHelp"};
+  addStructChange("delstruct", $name, $param);
+  structure_setDevs($hash);
   return undef;
 }