FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00
Code Issues Releases Wiki Activity

Respect the showInternalValues parameter

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

4
fhem/FHEM/98_XmlList.pm
View File

@ -71,9 +71,11 @@ CommandXmlList($$)
my $a3 = XmlEscape(getAllAttr($d)); my $a3 = XmlEscape(getAllAttr($d));
$str .= "\t\t<$t name=\"$d\" state=\"$a1\" sets=\"$a2\" attrs=\"$a3\">\n"; $str .= "\t\t<$t name=\"$d\" state=\"$a1\" sets=\"$a2\" attrs=\"$a3\">\n";
my $si = AttrVal("global", "showInternalValues", 0);
foreach my $c (sort keys %{$p}) { foreach my $c (sort keys %{$p}) {
next if(ref($p->{$c})); next if(ref($p->{$c}));
next if(!$si && $c =~ m/^\./);
$str .= sprintf("\t\t\t<INT key=\"%s\" value=\"%s\"/>\n", $str .= sprintf("\t\t\t<INT key=\"%s\" value=\"%s\"/>\n",
XmlEscape($c), XmlEscape($p->{$c})); XmlEscape($c), XmlEscape($p->{$c}));
} }
@ -81,6 +83,7 @@ CommandXmlList($$)
$p->{IODev}{NAME}) if($p->{IODev}); $p->{IODev}{NAME}) if($p->{IODev});
foreach my $c (sort keys %{$attr{$d}}) { foreach my $c (sort keys %{$attr{$d}}) {
next if(!$si && $c =~ m/^\./);
$str .= sprintf("\t\t\t<ATTR key=\"%s\" value=\"%s\"/>\n", $str .= sprintf("\t\t\t<ATTR key=\"%s\" value=\"%s\"/>\n",
XmlEscape($c), XmlEscape($attr{$d}{$c})); XmlEscape($c), XmlEscape($attr{$d}{$c}));
} }
@ -88,6 +91,7 @@ CommandXmlList($$)
my $r = $p->{READINGS}; my $r = $p->{READINGS};
if($r) { if($r) {
foreach my $c (sort keys %{$r}) { foreach my $c (sort keys %{$r}) {
next if(!$si && $c =~ m/^\./);
my $h = $r->{$c}; my $h = $r->{$c};
next if(!defined($h->{VAL}) || !defined($h->{TIME})); next if(!defined($h->{VAL}) || !defined($h->{TIME}));
$str .= $str .=