Revert "CVar-Helfer: cvars_by_config nach Config-Reihenfolge sortiert zurückgeben"
authorMoritz Bunkus <m.bunkus@linet-services.de>
Fri, 15 Dec 2017 10:19:54 +0000 (11:19 +0100)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Fri, 15 Dec 2017 10:55:13 +0000 (11:55 +0100)
This reverts commit 6e1a7a2e06de426b553ada3aed39f28b4825d0ce.

Die Funktion `_all_configs` liefert die Konfigurationen bereits
sortiert. Schlimmer ist, dass `sort_by` nicht numerisch sondern
alphabetisch sortiert, sodass `sortkey = 10` vor `sortkey = 2` kommt.

SL/DB/Helper/CustomVariables.pm

index a82397c..a6ab5ae 100644 (file)
@@ -4,7 +4,7 @@ use strict;
 use Carp;
 use Data::Dumper;
 use List::Util qw(first);
-use List::UtilsBy qw(sort_by partition_by);
+use List::UtilsBy qw(partition_by);
 
 use constant META_CVARS => 'cvars_config';
 
@@ -104,8 +104,6 @@ sub make_cvar_by_configs {
       @$configs
     );
 
-    @return = sort_by { $_->config->sortkey } @return;
-
     return \@return;
   }
 }