From 4f38bea6f9d9c6f2d72c03e63af3b1694c2b3dc6 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Wed, 21 Apr 2021 18:33:20 +0000
Subject: [PATCH] 10_FBDECT.pm: avoid simple fn-names (Forum #118303)

git-svn-id: https://svn.fhem.de/fhem/trunk@24300 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_FBDECT.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

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>]+?)[^/]*?>(.*?)</\g1>#
         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};