From bf0dc94921e43c0ca77dd5ab61cdabfec664e735 Mon Sep 17 00:00:00 2001 From: hapege <> Date: Sat, 16 Apr 2022 07:04:11 +0000 Subject: [PATCH] 70_SVDRP.pm: handle german Umlaute in timers git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@25970 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/70_SVDRP.pm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/FHEM/70_SVDRP.pm b/FHEM/70_SVDRP.pm index 85e89dccf..970539846 100755 --- a/FHEM/70_SVDRP.pm +++ b/FHEM/70_SVDRP.pm @@ -9,6 +9,7 @@ # version history # 1.01.01 first released version # 1.01.02 bugfix for single-digit NextTimer +# 1.01.03 corrections for german Umlaute # ######################################################################################## # @@ -40,7 +41,7 @@ use Blocking; use Time::HiRes qw(gettimeofday); use POSIX; -my $version = "1.01.02"; +my $version = "1.01.03"; my %SVDRP_gets = ( # @@ -554,8 +555,8 @@ sub SVDRP_parseMessage { $rv = readingsSingleUpdate($hash, $reading, $msg, 1); #Log3 $name, 5, "[$name] Parse: updated $reading with $msg" } - elsif ($msg =~ /^250[-|\h]\d+[ ]\d+:\d+:[A-Za-z-]{7}/ || - $msg =~ /^250[-|\h]\d+[ ]\d+:\d+:\d{4}-\d{2}-\d{2}:\d{4}:\d{4}:\d{2}:\d{2}:[A-Za-z0-9-_!?\.\h]+:\s$/){ + elsif ($msg =~ /^250[-|\h]\d+[ ]\d+:\d+:[A-Za-z\-]{7}/ || + $msg =~ /^250[-|\h]\d+[ ]\d+:\d+:\d{4}-\d{2}-\d{2}:\d{4}:\d{4}:\d{2}:\d{2}:/){ # ListTimer formats: # 250 1 1:1:MTWTF--@2022-03-15:0950:1115:50:99:Verrückt nach Meer (neu): # 250 2 1:4:2022-02-13:1858:1915:50:99:RTL Aktuell - Das Wetter: