2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00

98_DOIF.pm: fixed: safe comma

git-svn-id: https://svn.fhem.de/fhem/trunk@10899 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
damian-s 2016-02-21 12:41:29 +00:00
parent d1696554e0
commit 3400385f42

View File

@ -111,7 +111,7 @@ GetBlockDoIf ($$)
}
}
sub
GetCommand ($)
GetCommandDoIf ($)
{
my ($tailBlock) = @_;
my $char;
@ -138,6 +138,8 @@ GetCommand ($)
}
if ($cmd eq "") {
$cmd=$tailBlock;
} else {
$cmd=$cmd.$tailBlock
}
return ($cmd,"");
}
@ -541,7 +543,7 @@ ParseCommandsDoIf($$$)
return ($currentBlock,$err) if ($err);
#$tailBlock=substr($tailBlock,pos($tailBlock)) if ($tailBlock =~ /^\s*,/g);
} else {
($currentBlock,$tailBlock)=GetCommand($tailBlock);
($currentBlock,$tailBlock)=GetCommandDoIf($tailBlock);
}
if ($currentBlock ne "") {
($currentBlock,$err)=ReplaceAllReadingsDoIf($hash,$currentBlock,-1,$eval);