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

@@ -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};