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

98_fheminfo.pm: add featurelevel (Forum #44231)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@9928 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2015-11-18 19:12:26 +00:00
parent 9d7c346d13
commit c722d3bcbb
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
fhem/FHEM/98_fheminfo.pm
View File

@ -75,6 +75,7 @@ CommandFheminfo($$)
my $branch = "DEVELOPMENT"; # UNUSED
my $release = "5.7";
my $feature = $featurelevel ? $featurelevel : $release;
my $os = $^O;
my $arch = $Config{"archname"};
my $perl = $^V;
@ -112,7 +113,8 @@ CommandFheminfo($$)
my $str;
$str = "Fhem info:\n";
$str .= sprintf(" Release%*s: %s\n",2," ",$release);
$str .= sprintf(" Release%*s: %s FeatureLevel: %s\n",
2, " ", $release, $feature);
$str .= sprintf(" OS%*s: %s\n",7," ",$os);
$str .= sprintf(" Arch%*s: %s\n",5," ",$arch);
$str .= sprintf(" Perl%*s: %s\n",5," ",$perl);