From d8acb32c1988d5b84fdf4b4a859706751b26bda1 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Fri, 30 Apr 2021 10:43:05 +0000
Subject: [PATCH] 98_fhemdebug.pm: show argument/name in timerlist if possible
 (Forum #120768)

git-svn-id: https://svn.fhem.de/fhem/trunk@24363 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/98_fhemdebug.pm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/fhem/FHEM/98_fhemdebug.pm b/fhem/FHEM/98_fhemdebug.pm
index 04e25e98f..22d2be340 100644
--- a/fhem/FHEM/98_fhemdebug.pm
+++ b/fhem/FHEM/98_fhemdebug.pm
@@ -119,8 +119,11 @@ fhemdebug_timerList($)
       my $cv = svref_2object($fnName);
       $fnName = $cv->GV->NAME if($cv); # get function name
     }
-    push(@res, sprintf("%s.%05d %s%s",
-      FmtDateTime($tt), int(($tt-int($tt))*100000), $fnName,
+    push(@res, sprintf("%s.%05d %s %s %s",
+      FmtDateTime($tt), int(($tt-int($tt))*100000), 
+      $fnName,
+      ($h->{ARG} && ref($h->{ARG}) eq "HASH" && $h->{ARG}{NAME} ? 
+       $h->{ARG}{NAME} : ""),
       $h->{STACKTRACE} ? $h->{STACKTRACE} : ""));
   }
   return join("\n", @res);