From 698a78461b8d086b3cad8b4a0b2c60d44b3ea9da Mon Sep 17 00:00:00 2001
From: martinp876 <>
Date: Sun, 20 Sep 2020 09:37:18 +0000
Subject: [PATCH] HMInfo:logging and debugging extentions - verbCULHM

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

diff --git a/fhem/FHEM/98_HMinfo.pm b/fhem/FHEM/98_HMinfo.pm
index ab3951f4b..227493faf 100644
--- a/fhem/FHEM/98_HMinfo.pm
+++ b/fhem/FHEM/98_HMinfo.pm
@@ -65,7 +65,7 @@ sub HMinfo_Initialize($$) {####################################################
                        ."hmManualOper:0_auto,1_manual "
                        ."configDir configFilename configTempFile "
                        ."hmDefaults "
-                       ."verbCULHM:multiple,allSet,allGet,none "
+                       ."verbCULHM:multiple,none,allSet,allGet,allSetVerb,allGetVerb "
                        .$readingFnAttributes;
   $hash->{NOTIFYDEV} = "global";
 }
@@ -1218,10 +1218,10 @@ sub HMinfo_GetFn($@) {#########################################################
   my ($opt,$optEmpty,$filter) = ("",1,"");
   my $ret;
   $doAli = 0;#set default
-  Log3 $hash,3,"HMinfo $name get:$cmd :".join(",",@a) if ($cmd && $cmd ne "?");
-  if (@a && ($a[0] =~ m/^(-[dcasev]+)/)){# options provided
+  Log3 $hash,4,"HMinfo $name get:$cmd :".join(",",@a) if ($cmd && $cmd ne "?");
+  if (@a && ($a[0] =~ m/^(-[dcivpase2]+)/)){# options provided
     $opt = $1;
-    $a[0] =~ s/^(-[dcasev]*)//;
+    $a[0] =~ s/^(-[dcivpase2]*)//;
     $optEmpty = ($opt =~ m/e/)?1:0;
     shift @a if($a[0] || $a[0] =~ m/^[ ]*$/); #remove
   }