@@ -54,10 +54,10 @@ test_with_one_resource_server(_) ->
5454 } = translate_oauth_resource_servers (Conf ).
5555
5656test_with_many_resource_servers (_ ) ->
57- Conf = [
57+ Conf = lists : reverse ([ % % cuttlefish reverse the order. So calling lists:reverse simulates cuttlefish
5858 {[" management" ," oauth_resource_servers" ," keycloak" ," label" ]," Keycloak" },
5959 {[" management" ," oauth_resource_servers" ," uaa" ," label" ]," Uaa" }
60- ],
60+ ]) ,
6161 #{
6262 <<" keycloak" >> := [
6363 {index , 1 },
@@ -72,14 +72,14 @@ test_with_many_resource_servers(_) ->
7272 } = translate_oauth_resource_servers (Conf ).
7373
7474test_preserve_order_when_using_many_resource_servers (_ ) ->
75- Conf = [
75+ Conf = lists : reverse ( [
7676 {[" management" ," oauth_resource_servers" ," uaa" ," label" ]," Uaa" },
7777 {[" management" ," oauth_resource_servers" ," uaa" ," oauth_client_id" ]," uaa-client" },
7878 {[" management" ," oauth_resource_servers" ," spring" ," label" ]," Spring" },
7979 {[" management" ," oauth_resource_servers" ," spring" ," oauth_client_id" ]," spring-client" },
8080 {[" management" ," oauth_resource_servers" ," keycloak" ," label" ]," Keycloak" },
8181 {[" management" ," oauth_resource_servers" ," keycloak" ," oauth_client_id" ]," keycloak-client" }
82- ],
82+ ]) ,
8383 SortByIndex = fun ({_ , A }, {_ , B }) ->
8484 proplists :get_value (index , A ) =< proplists :get_value (index , B ) end ,
8585
0 commit comments