mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

38_BEOK.pm: fix regex for set profile time and temp

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@24803 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
Wzut
2021-07-27 17:30:56 +00:00
parent 8c974d803a
commit 9aa03d1732
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
fhem/FHEM/38_BEOK.pm
View File

@@ -519,8 +519,8 @@ sub Set {
return send_packet($hash, 0x6a, @payload);
}
if ( $cmd =~ m{ /^(day|we)-profile[1-8]-time$/ }x ) {
return "Time must be between 0:00 and 23:59" if ($subcmd !~ m{/(?:[01]\d|2[0123]):(?:[012345]\d)/gm}x);
if ( $cmd =~ m{(day|we)-profile[1-8]-time}x ) {
return "Time must be between 0:00 and 23:59" if ($subcmd !~ /(?:[01]\d|2[0123]):(?:[012345]\d)/gmx);
my $day = $cmd;
$day =~ s/(day|we)-profile//;
$day =~ s/-time//;
@@ -534,7 +534,7 @@ sub Set {
return send_packet($hash, 0x6a, @payload);
}
if ( $cmd =~ m{ /^(day|we)-profile[1-8]-temp$/ }x ) {
if ( $cmd =~ m{(day|we)-profile[1-8]-temp}x ) {
my $temp = int($subcmd*2);
return "Temperature must be between 5 and 99" if (($temp < 10) || ($temp > 198));