From e25bc4ba8ee67727a25e41420f8cfef92d5325d6 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Fri, 2 Apr 2010 16:07:08 +0000
Subject: [PATCH] set ? fixed

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

diff --git a/fhem/FHEM/98_structure.pm b/fhem/FHEM/98_structure.pm
index c6a6bcb27..d650c6716 100755
--- a/fhem/FHEM/98_structure.pm
+++ b/fhem/FHEM/98_structure.pm
@@ -133,7 +133,10 @@ structure_Set($@)
 {
   my ($hash, @list) = @_;
   my $ret = "";
+  my %pars;
+
   $hash->{INSET} = 1;
+
   foreach my $d (sort keys %{ $hash->{CONTENT} }) {
     next if(!$defs{$d});
     if($defs{$d}{INSET}) {
@@ -151,11 +154,17 @@ structure_Set($@)
     if($sret) {
       $ret .= "\n" if($ret);
       $ret .= $sret;
+      if($list[1] eq "?") {
+        $sret =~ s/.*one of //;
+        map { $pars{$_} = 1 } split(" ", $sret);
+      }
     }
   }
   delete($hash->{INSET});
-  Log 5, "ATTR: $ret" if($ret);
-  return undef;
+  Log 5, "SET: $ret" if($ret);
+  return $list[1] eq "?"
+           ? "Unknown argument ?, choose one of " . join(" ", sort keys(%pars))
+           : undef;
 }
 
 ###################################