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

93_DbLog: contrib 5.10.0

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@28649 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2024-03-12 22:22:33 +00:00
parent 5837aecd26
commit f8551e2403
1 changed files with 21 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
fhem/contrib/DS_Starter/93_DbLog.pm
View File

@ -8597,26 +8597,33 @@ sub DbLog_fhemwebFn {
my $name = "SVG_${d}_$newIdx";
my $img = FW_makeImage('time_graph@grey');
my $title = "Create SVG plot from DbLog";
my $dstyle = qq{style='padding-left: 10px; padding-right: 10px; padding-top: 3px; padding-bottom: 3px; white-space:nowrap;'}; # TD-Style
my $svgtitle = "Create SVG plot from DbLog";
my $svgimg = FW_makeImage('time_graph@grey');
my $forimg = FW_makeImage('time_note@grey');
my $fthicon = "<a href='https://forum.fhem.de/index.php?board=20.0' target='_blank'>$forimg</a>";
my $fthtitle = "Open DbLog Forum";
if (AttrVal ('global', 'language', 'EN') eq 'DE') {
$title = "SVG-Diagramm aus DbLog erstellen";
$svgtitle = "SVG-Diagramm aus DbLog erstellen";
$fthtitle = "DbLog Forum öffnen";
}
my $dstyle = qq{style='padding-left: 10px; padding-right: 10px; padding-top: 3px; padding-bottom: 3px; white-space:nowrap;'}; # TD-Style
my $class = qq{<table width='100%'>};
my $class = qq{<table width='10%'>};
$class .= qq{<tr>};
$class .= qq{<td align="left" title="$title" $dstyle> $img </td>};
$class .= qq{<td align="left" title="$svgtitle" $dstyle> $svgimg </td>};
$class .= qq{</tr>};
$class .= qq{</table>};
$ret = qq{<table width='10%'>};
$ret .= qq{<tr>};
# $link , $txt , $td , $class , $doRet , $nonl
$ret .= FW_pH ("cmd=define $name SVG $d:templateDB:HISTORY;set $name copyGplotFile&detail=$name",
"<div class=\"dval\">$class</div>",
0,
"dval",
1);
"<div class=\"dval\">$class</div>", 1, "dval", 1);
$ret .= qq{<td align="left" title="$fthtitle" $dstyle> $fthicon </td>};
$ret .= qq{</tr>};
$ret .= qq{</table>};
return $ret;
}