summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSimon MacMullen <simon@rabbitmq.com>2014-05-16 16:04:37 +0100
committerSimon MacMullen <simon@rabbitmq.com>2014-05-16 16:04:37 +0100
commitec6e5efef91906c6a92da6ffa3e9d02680470f8b (patch)
tree136a029848edb56c15cc20458439c1b3200fb54e
parentdb054fbd6cfa1af1d32258aaa849a9698fa3a1e8 (diff)
downloadrabbitmq-server-bug26178.tar.gz
Cope if report is not a list.bug26178
-rw-r--r--src/truncate.erl11
1 files changed, 6 insertions, 5 deletions
diff --git a/src/truncate.erl b/src/truncate.erl
index 02dba2e3..1d69de56 100644
--- a/src/truncate.erl
+++ b/src/truncate.erl
@@ -37,11 +37,12 @@ log_event({Type, GL, {Pid, ReportType, Report}}, Params)
log_event(Event, _Params) ->
Event.
-report([[Thing]], Params) -> report([Thing], Params);
-report(List, Params) -> [case Item of
- {K, V} -> {K, term(V, Params)};
- _ -> term(Item, Params)
- end || Item <- List].
+report([[Thing]], Params) -> report([Thing], Params);
+report(List, Params) when is_list(List) -> [case Item of
+ {K, V} -> {K, term(V, Params)};
+ _ -> term(Item, Params)
+ end || Item <- List];
+report(Other, Params) -> term(Other, Params).
term(Thing, {Content, Struct, ContentDec, StructDec}) ->
term(Thing, true, #params{content = Content,