From 6e1a7a2e06de426b553ada3aed39f28b4825d0ce Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
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