2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00

98_fhemdebug.pm: do not size class instances (Forum #73490)

git-svn-id: https://svn.fhem.de/fhem/trunk@16051 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2018-01-30 21:05:53 +00:00
parent 20194697d7
commit 947767c6a3

View File

@ -131,7 +131,7 @@ fhemdebug_memusage($)
my $name = ($mname eq "main::" ? "$mname$n" : "${mname}::$n");
$ref = "HASH" if(!$ref && $mname eq "main::" && $mh{$n});
next if($n eq "main::" || $n eq "IODev" ||
$ref eq "CODE" || main->can("$mname$n"));
$ref eq "CODE" || main->can("$mname$n") || $ref =~ m/::/);
Log 5, " CHECK $name / $mname / $n / $ref"; # Crash-debugging
if($ref eq "HASH") {
$sum += $fn->($fn, $h->{$n}, $name, $cleanUp);