FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-04 23:46:35 +00:00
Code Issues Releases Wiki Activity

Respect the showInternalValues

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@2410 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2013-01-03 13:04:12 +00:00
parent 9519112351
commit af67e5a5e3
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
fhem/FHEM/01_FHEMWEB.pm
View File

@ -713,11 +713,15 @@ FW_makeTable($$@)
return if(!$hash || !int(keys %{$hash})); return if(!$hash || !int(keys %{$hash}));
FW_pO "<table class=\"block wide\">"; FW_pO "<table class=\"block wide\">";
my $si = AttrVal("global", "showInternalValues", 0);
my $row = 1; my $row = 1;
foreach my $n (sort keys %{$hash}) { foreach my $n (sort keys %{$hash}) {
next if(!$si && $n =~ m/^\./); # Skip "hidden" Values
my $val = $hash->{$n}; my $val = $hash->{$n};
$val = $hash->{$n}{NAME} if($n eq "IODev" && ref($val) eq "HASH" && defined($hash->{$n}{NAME}));
$val = $hash->{$n}{NAME} # Exception
if($n eq "IODev" && ref($val) eq "HASH" && defined($hash->{$n}{NAME}));
my $r = ref($val); my $r = ref($val);
next if($r && ($r ne "HASH" || !defined($hash->{$n}{VAL}))); next if($r && ($r ne "HASH" || !defined($hash->{$n}{VAL})));
@ -828,16 +832,16 @@ FW_doDetail($)
} }
FW_pO "<table><tr><td>"; FW_pO "<table><tr><td>";
FW_makeSelect($d, "set", getAllSets($d), "set"); FW_makeSelect($d, "set", getAllSets($d), "set");
FW_makeTable($d, $h); FW_makeTable($d, $h); # Internal values
FW_pO "Readings" if($h->{READINGS}); FW_pO "Readings" if($h->{READINGS});
FW_makeTable($d, $h->{READINGS}); FW_makeTable($d, $h->{READINGS}); # Readings
my $attrList = getAllAttr($d); my $attrList = getAllAttr($d);
my $roomList = join(",", sort grep !/ /, keys %FW_rooms); my $roomList = join(",", sort grep !/ /, keys %FW_rooms);
$attrList =~ s/room /room:$roomList /; $attrList =~ s/room /room:$roomList /;
FW_makeSelect($d, "attr", $attrList,"attr"); FW_makeSelect($d, "attr", $attrList,"attr");
FW_makeTable($d, $attr{$d}, "deleteattr"); FW_makeTable($d, $attr{$d}, "deleteattr"); # Attributes
if($t eq "FileLog" ) { if($t eq "FileLog" ) {