a little improvement: use device name if no alias defines (for text/html output methods)
git-svn-id: https://svn.fhem.de/fhem/trunk@6600 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -30,7 +30,7 @@ package main;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
my $VERSION = "1.8.1";
|
||||
my $VERSION = "1.8.2";
|
||||
|
||||
use constant {
|
||||
PERL_VERSION => "perl_version",
|
||||
@@ -1842,7 +1842,8 @@ sub SYSMON_ShowValuesHTML ($;@)
|
||||
sub SYSMON_ShowValuesHTMLTitled ($;$@)
|
||||
{
|
||||
my ($name, $title, @data) = @_;
|
||||
$title = $attr{$name}{'alias'} unless $title;
|
||||
$title = $attr{$name}{'alias'} unless $title;
|
||||
$title = $name unless $title;
|
||||
return SYSMON_ShowValuesFmt($name, $title, 1, @data);
|
||||
}
|
||||
|
||||
@@ -1868,7 +1869,8 @@ sub SYSMON_ShowValuesText ($;@)
|
||||
sub SYSMON_ShowValuesTextTitled ($;$@)
|
||||
{
|
||||
my ($name, $title, @data) = @_;
|
||||
$title = $attr{$name}{'alias'} unless $title;
|
||||
$title = $attr{$name}{'alias'} unless $title;
|
||||
$title = $name unless $title;
|
||||
return SYSMON_ShowValuesFmt($name, $title, 0, @data);
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user