@@ -236,14 +236,17 @@ apply_defs(Map, ActingUser, SuccessFun) when is_function(SuccessFun) ->
236
236
validate_limits (Map ),
237
237
concurrent_for_all (permissions , ActingUser , Map , fun add_permission /2 ),
238
238
concurrent_for_all (topic_permissions , ActingUser , Map , fun add_topic_permission /2 ),
239
- sequential_for_all (parameters , ActingUser , Map , fun add_parameter /2 ),
239
+
240
+ concurrent_for_all (queues , ActingUser , Map , fun add_queue /2 ),
241
+ concurrent_for_all (exchanges , ActingUser , Map , fun add_exchange /2 ),
242
+ concurrent_for_all (bindings , ActingUser , Map , fun add_binding /2 ),
243
+
240
244
sequential_for_all (global_parameters , ActingUser , Map , fun add_global_parameter /2 ),
241
245
% % importing policies concurrently can be unsafe as queues will be getting
242
246
% % potentially out of order notifications of applicable policy changes
243
247
sequential_for_all (policies , ActingUser , Map , fun add_policy /2 ),
244
- concurrent_for_all (queues , ActingUser , Map , fun add_queue /2 ),
245
- concurrent_for_all (exchanges , ActingUser , Map , fun add_exchange /2 ),
246
- concurrent_for_all (bindings , ActingUser , Map , fun add_binding /2 ),
248
+ sequential_for_all (parameters , ActingUser , Map , fun add_parameter /2 ),
249
+
247
250
SuccessFun (),
248
251
ok
249
252
catch {error , E } -> {error , E };
@@ -260,13 +263,16 @@ apply_defs(Map, ActingUser, SuccessFun, VHost) when is_binary(VHost) ->
260
263
[VHost , ActingUser ]),
261
264
try
262
265
validate_limits (Map , VHost ),
266
+
267
+ concurrent_for_all (queues , ActingUser , Map , VHost , fun add_queue /3 ),
268
+ concurrent_for_all (exchanges , ActingUser , Map , VHost , fun add_exchange /3 ),
269
+ concurrent_for_all (bindings , ActingUser , Map , VHost , fun add_binding /3 ),
270
+
263
271
sequential_for_all (parameters , ActingUser , Map , VHost , fun add_parameter /3 ),
264
272
% % importing policies concurrently can be unsafe as queues will be getting
265
273
% % potentially out of order notifications of applicable policy changes
266
274
sequential_for_all (policies , ActingUser , Map , VHost , fun add_policy /3 ),
267
- concurrent_for_all (queues , ActingUser , Map , VHost , fun add_queue /3 ),
268
- concurrent_for_all (exchanges , ActingUser , Map , VHost , fun add_exchange /3 ),
269
- concurrent_for_all (bindings , ActingUser , Map , VHost , fun add_binding /3 ),
275
+
270
276
SuccessFun ()
271
277
catch {error , E } -> {error , format (E )};
272
278
exit :E -> {error , format (E )}
@@ -283,13 +289,16 @@ apply_defs(Map, ActingUser, SuccessFun, ErrorFun, VHost) ->
283
289
[VHost , ActingUser ]),
284
290
try
285
291
validate_limits (Map , VHost ),
292
+
293
+ concurrent_for_all (queues , ActingUser , Map , VHost , fun add_queue /3 ),
294
+ concurrent_for_all (exchanges , ActingUser , Map , VHost , fun add_exchange /3 ),
295
+ concurrent_for_all (bindings , ActingUser , Map , VHost , fun add_binding /3 ),
296
+
286
297
sequential_for_all (parameters , ActingUser , Map , VHost , fun add_parameter /3 ),
287
298
% % importing policies concurrently can be unsafe as queues will be getting
288
299
% % potentially out of order notifications of applicable policy changes
289
300
sequential_for_all (policies , ActingUser , Map , VHost , fun add_policy /3 ),
290
- concurrent_for_all (queues , ActingUser , Map , VHost , fun add_queue /3 ),
291
- concurrent_for_all (exchanges , ActingUser , Map , VHost , fun add_exchange /3 ),
292
- concurrent_for_all (bindings , ActingUser , Map , VHost , fun add_binding /3 ),
301
+
293
302
SuccessFun ()
294
303
catch {error , E } -> ErrorFun (format (E ));
295
304
exit :E -> ErrorFun (format (E ))
0 commit comments