From c722d3bcbbd77089fbb77890612cdc21b1829db6 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Wed, 18 Nov 2015 19:12:26 +0000
Subject: [PATCH] 98_fheminfo.pm: add featurelevel (Forum #44231)

git-svn-id: https://svn.fhem.de/fhem/trunk@9928 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/98_fheminfo.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/fhem/FHEM/98_fheminfo.pm b/fhem/FHEM/98_fheminfo.pm
index 665e883a2..e8295fe37 100644
--- a/fhem/FHEM/98_fheminfo.pm
+++ b/fhem/FHEM/98_fheminfo.pm
@@ -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);