From 6e1a7a2e06de426b553ada3aed39f28b4825d0ce Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Tue, 5 Apr 2016 14:13:21 +0200 Subject: [PATCH] =?utf8?q?CVar-Helfer:=20cvars=5Fby=5Fconfig=20nach=20Conf?= =?utf8?q?ig-Reihenfolge=20sortiert=20zur=C3=BCckgeben?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/DB/Helper/CustomVariables.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/SL/DB/Helper/CustomVariables.pm b/SL/DB/Helper/CustomVariables.pm index 6ebebda41..9de839496 100644 --- a/SL/DB/Helper/CustomVariables.pm +++ b/SL/DB/Helper/CustomVariables.pm @@ -4,6 +4,7 @@ use strict; use Carp; use Data::Dumper; use List::Util qw(first); +use List::UtilsBy qw(sort_by); use constant META_CVARS => 'cvars_config'; @@ -98,6 +99,8 @@ sub make_cvar_by_configs { @$configs ); + @return = sort_by { $_->config->sortkey } @return; + return \@return; } } -- 2.20.1