Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-04 22:19:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

98_logProxy.pm: added polar to logProxy_sampleDataFn, fixed perl warning

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@7843 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme-1968 2015-02-03 12:17:25 +00:00
parent a5a8654f9f
commit ee68acee85
1 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
fhem/FHEM/98_logProxy.pm
View File

@ -77,7 +77,7 @@ logProxy_sampleDataFn($$$$$)
my $desc = "Type,Spec";
my $columns = "ConstX,ConstY,Func,FileLog,DbLog";
my $columns = "ConstX,ConstY,Func,Polar,FileLog,DbLog";
my @htmlArr;
$max = 16 if($max > 16);
@ -694,7 +694,7 @@ logProxy_Get($@)
if( $a[$i] =~ m/^(FileLog|DbLog):([^:]*):(.*)/ ) {
my @options = split( ',', $fld[1] );
my $log_dev = $options[0];
my $log_dev = shift(@options);
my $infile = $fld[0] eq "DbLog" ? "HISTORY" : "CURRENT";
my $column_specs = $3;
@ -714,7 +714,6 @@ logProxy_Get($@)
next;
}
my @options = @options[1..@options-1];
while (@options) {
my $option = shift(@options);
while ($option && $option =~ m/={/ && $option !~ m/>}/ ) {
@ -723,7 +722,6 @@ logProxy_Get($@)
$option .= ",". $next;
}
#foreach my $option ( @options[1..@options-1] ) {
my ($name,$value) = split( '=', $option, 2 );
if( $value ) {
@ -1200,7 +1198,7 @@ logProxy_Get($@)
<ul>
<code>#logProxy DbLog:dbLog,scale2reading={year=>'temperature_avg_day',month=>'temperature_avg_day'}:s300ht_1:temperature::</code><br>
</ul><br>
<br></li>
</ul>