[patch] 98_fheminfo.pm liefert falsche Release-Info...

[betateilchen]

... und für manche Leute bedeutet das offenbar den Weltuntergang

http://forum.fhem.de/index.php/topic,44203.0.html

Code Auswählen Erweitern


Index: 98_fheminfo.pm
===================================================================
--- 98_fheminfo.pm (Revision 9915)
+++ 98_fheminfo.pm (Arbeitskopie)
@@ -74,7 +74,7 @@
        lc(AttrVal("global","sendStatistics","")) eq "never");

   my $branch   = "DEVELOPMENT"; # UNUSED
-  my $release  = "5.6";
+  my $release  = $featurelevel;
   my $os       = $^O;
   my $arch     = $Config{"archname"};
   my $perl     = $^V;


[rudolfkoenig]

Danke fuer den Hinweis, hiermit ist der Weltuntergang offiziell verschoben.

Ich habe allerdings hart 5.7 reingeschrieben, da ich nicht will, dass in der schoenen Statistik komische/erfundene Zahlen auftauchen (attr global featurelevel 5.60 oder so)

[betateilchen]

Ich habe allerdings hart 5.7 reingeschrieben,

ok, dann ist der Weltuntergang nur solange verschoben, bis der Erste, der manuell den featurelevel auf 5.6 setzt, darüber jammert, dass fheminfo 5.7 ausgibt... 

[Benni]

Sorry, dass ich mich hier kurz ungefragt einmische,
aber man könnte doch zur Weltuntergangsvermeidung  $featurelevel bei fheminfo einfach zusätzlich auflisten.

... und dann bin ich auch schon wieder raus.

[betateilchen]

Wäre prinzipiell auch kein Problem:

Code Auswählen Erweitern


Index: /opt/fhem.svn/fhem/FHEM/98_fheminfo.pm
===================================================================
--- /opt/fhem.svn/fhem/FHEM/98_fheminfo.pm (Revision 9926)
+++ /opt/fhem.svn/fhem/FHEM/98_fheminfo.pm (Arbeitskopie)
@@ -75,6 +75,7 @@

   my $branch   = "DEVELOPMENT"; # UNUSED
   my $release  = "5.7";
+  my $feature  = $featurelevel ? $featurelevel : "5.7";
   my $os       = $^O;
   my $arch     = $Config{"archname"};
   my $perl     = $^V;
@@ -112,7 +113,7 @@

   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);


liefert:

(http://up.picr.de/23746096xv.png)

und der featurelevel geht nicht in die Statistik ein.

[rudolfkoenig]

und der featurelevel geht nicht in die Statistik ein.

Das wollte ich hoeren.
Habs eingecheckt.