From: Moritz Bunkus Date: Fri, 15 Dec 2017 10:19:54 +0000 (+0100) Subject: Revert "CVar-Helfer: cvars_by_config nach Config-Reihenfolge sortiert zurückgeben" X-Git-Tag: release-3.5.4~577 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=3334532e8cb138c4b32dc6bbf7203d5b659068cf;p=kivitendo-erp.git Revert "CVar-Helfer: cvars_by_config nach Config-Reihenfolge sortiert zurückgeben" 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. --- diff --git a/SL/DB/Helper/CustomVariables.pm b/SL/DB/Helper/CustomVariables.pm index a82397c5e..a6ab5ae18 100644 --- a/SL/DB/Helper/CustomVariables.pm +++ b/SL/DB/Helper/CustomVariables.pm @@ -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; } }