From 64fda0635880aeee08096e58ca29485311a3e1c7 Mon Sep 17 00:00:00 2001
From: Matthew Sackman <matthew@rabbitmq.com>
Date: Thu, 2 Jun 2011 15:25:42 +0100
Subject: Reduce diff from bug23554: Allow formatting of nested info items

---
 src/rabbit_control.erl | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'src')

diff --git a/src/rabbit_control.erl b/src/rabbit_control.erl
index 8172f8040c..8e0a2a535f 100644
--- a/src/rabbit_control.erl
+++ b/src/rabbit_control.erl
@@ -372,6 +372,12 @@ format_info_item([{TableEntryKey, TableEntryType, _TableEntryValue} | _] =
                      Value) when is_binary(TableEntryKey) andalso
                                  is_atom(TableEntryType) ->
     io_lib:format("~1000000000000p", [prettify_amqp_table(Value)]);
+format_info_item([T | _] = Value)
+  when is_tuple(T) orelse is_pid(T) orelse is_binary(T) orelse is_atom(T) orelse
+       is_list(T) ->
+    "[" ++
+        lists:nthtail(2, lists:append(
+                           [", " ++ format_info_item(E) || E <- Value])) ++ "]";
 format_info_item(Value) ->
     io_lib:format("~w", [Value]).
 
-- 
cgit v1.2.1