FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-04 05:16:45 +00:00
Code Issues Releases Wiki Activity

HMInfo:logging and debugging extentions - verbCULHM

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@22801 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2020-09-20 09:37:18 +00:00
parent 1b6d39578e
commit 698a78461b
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
fhem/FHEM/98_HMinfo.pm
View File

@ -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
}