FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-20 19:36:02 +00:00
Code Issues Releases Wiki Activity

70_SVDRP.pm: bugfix in NextTimer

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@25873 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
hapege 2022-03-22 20:07:51 +00:00
parent e41c21d5bb
commit c158378faf
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
fhem/FHEM/70_SVDRP.pm
View File

@ -8,6 +8,7 @@
# #
# version history # version history
# 1.01.01 first released version # 1.01.01 first released version
# 1.01.02 bugfix for single-digit NextTimer
# #
######################################################################################## ########################################################################################
# #
@ -39,7 +40,7 @@ use Blocking;
use Time::HiRes qw(gettimeofday); use Time::HiRes qw(gettimeofday);
use POSIX; use POSIX;
my $version = "1.01.01"; my $version = "1.01.02";
my %SVDRP_gets = ( my %SVDRP_gets = (
# #
@ -132,6 +133,8 @@ sub SVDRP_Define {
$hash->{devioNoSTATE} = 1; $hash->{devioNoSTATE} = 1;
# subscribe only to notify from global and self # subscribe only to notify from global and self
$hash->{NOTIFYDEV} = "global,TYPE=SVDRP"; $hash->{NOTIFYDEV} = "global,TYPE=SVDRP";
# set version
$hash->{version} = $version;
my $name = $hash->{NAME}; my $name = $hash->{NAME};
@ -522,7 +525,7 @@ sub SVDRP_parseMessage {
SVDRP_parseDiskStatus($hash, $reading, $msg); SVDRP_parseDiskStatus($hash, $reading, $msg);
#Log3 $name, 5, "[$name] Parse: updated $reading with '$msg'"; #Log3 $name, 5, "[$name] Parse: updated $reading with '$msg'";
} }
elsif ($msg =~ /^250[ ]\d+[ ][A-Za-z]{3}[ ][A-Za-z]{3}[ ][1-9]{2}[ ][0-9]{2}:[0-9]{2}:[0-9]{2}[ ][0-9]{4}\s$/){ elsif ($msg =~ /^250[ ]\d+[ ][A-Za-z]{3}[ ][A-Za-z]{3}[ ]{1,2}[0-9]{1,2}[ ][0-9]{2}:[0-9]{2}:[0-9]{2}[ ][0-9]{4}\s$/){
# next timer format: 250 1 Tue Mar 15 09:50:00 2022 # next timer format: 250 1 Tue Mar 15 09:50:00 2022
$reading = "NextTimer"; $reading = "NextTimer";
(my $code, $msg) = split (/ /, $msg, 2); (my $code, $msg) = split (/ /, $msg, 2);