Preserve config order

Author: MarcialRosales

deps/rabbitmq_management/src/rabbit_mgmt_schema.erl

@@ -7,6 +7,7 @@
 
 -module(rabbit_mgmt_schema).
 
+-include_lib("kernel/include/logger.hrl").
 
 -export([
     translate_oauth_resource_servers/1,
@@ -54,6 +55,7 @@ extract_resource_server_properties(Settings) ->
 
     OAuthResourceServers = [{Name, {list_to_atom(Key), convert_list_to_binary(V)}}
         || {["management","oauth_resource_servers", Name, Key], V} <- Settings ],
+    ?LOG_DEBUG("OAuthResourceServers: ~p", [OAuthResourceServers]),
     maps:groups_from_list(KeyFun, ValueFun, OAuthResourceServers).
 
 

deps/rabbitmq_management/test/rabbit_mgmt_schema_SUITE.erl

@@ -19,7 +19,8 @@ all() ->
         test_invalid_endpoint_params,
         test_translate_endpoint_params,
         test_with_one_resource_server,
-        test_with_many_resource_servers
+        test_with_many_resource_servers,
+        test_preserve_order_when_using_many_resource_servers
     ].
 
 
@@ -67,6 +68,26 @@ test_with_many_resource_servers(_) ->
         ]
     } = translate_oauth_resource_servers(Conf).
 
+test_preserve_order_when_using_many_resource_servers(_) ->
+    Conf = [
+        {["management","oauth_resource_servers","uaa","label"],"Uaa"},
+        {["management","oauth_resource_servers","spring","label"],"Spring"},
+        {["management","oauth_resource_servers","keycloak","label"],"Keycloak"}        
+    ],
+    #{
+        <<"uaa">> := [
+            {label, <<"Uaa">>},
+            {id, <<"uaa">>}
+        ],
+         <<"spring">> := [
+            {label, <<"Spring">>},
+            {id, <<"spring">>}
+        ],
+            <<"keycloak">> := [
+            {label, <<"Keycloak">>},
+            {id, <<"keycloak">>}
+        ]
+    } = translate_oauth_resource_servers(Conf).
 
 cert_filename(Conf) ->
     string:concat(?config(data_dir, Conf), "certs/cert.pem").