diff --git a/fhem/FHEM/10_FBDECT.pm b/fhem/FHEM/10_FBDECT.pm index e9eb42746..5ec1ef224 100644 --- a/fhem/FHEM/10_FBDECT.pm +++ b/fhem/FHEM/10_FBDECT.pm @@ -448,7 +448,7 @@ FBDECT_ParseHttp($$$) $omsg =~ s, ([a-z_]+?)="([^"]*)",$h{$1}=$2 if(!$h{$1}),ge; # Attributes if($h{lastpressedtimestamp}) { # Dect400/#94700, 440/#118303 - sub dp { + sub FBDECT_ParseTimestamp { my ($txt,$h,$ln) = (@_); $txt =~ s#<([^/\s>]+?)[^/]*?>(.*?)# my ($n,$c) = ($1,$2); @@ -456,10 +456,10 @@ FBDECT_ParseHttp($$$) if($n eq "lastpressedtimestamp" && $ln) { $h->{"${n}_$ln"} = ($c =~ m/^\d{10}$/ ? FmtDateTime($c) : "N/A"); } - dp($c, $h) if($c && $c =~ m/^<.*>$/); + FBDECT_ParseTimestamp($c, $h) if($c && $c =~ m/^<.*>$/); #gex; } - dp($msg, \%h); + FBDECT_ParseTimestamp($msg, \%h); } my $ain = $h{identifier};