10_FBDECT.pm: fix DECT440 buttons (Forum #118303)

git-svn-id: https://svn.fhem.de/fhem/trunk@24127 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2021-04-02 15:56:06 +00:00
parent 732ad9f238
commit 9adc8d795f

View File

@@ -452,7 +452,7 @@ FBDECT_ParseHttp($$$)
my ($txt,$h,$ln) = (@_);
$txt =~ s#<([^/\s>]+?)[^/]*?>(.*?)</\g1>#
my ($n,$c) = ($1,$2);
$ln = makeReadingName($1) if($n eq "name" && $c =~ m/:\s*([^\s]*)$/);
$ln = makeReadingName($1) if($n eq "name" && $c =~ m/:\s*(.*)$/);
if($n eq "lastpressedtimestamp" && $ln) {
$h->{"${n}_$ln"} = ($c =~ m/^\d{10}$/ ? FmtDateTime($c) : "N/A");
}