Fix JSON format alert output

Author: nickelization

src/clique_json_writer.erl

@@ -65,15 +65,15 @@ prepare(Status) ->
 prepare_status(alert, Ctx=#context{alert_set=true}) ->
     %% TODO: Should we just return an error instead?
     throw({error, nested_alert, Ctx});
-prepare_status(Term, Ctx=#context{alert_set=true, alert_list=AList}) ->
-    Ctx#context{alert_list=[Term | AList]};
 prepare_status(alert, Ctx) ->
     Ctx#context{alert_set=true};
 prepare_status(alert_done, Ctx = #context{alert_list=AList, output=Output}) ->
     %% AList is already reversed, and prepare returns reversed output, so they cancel out
     AlertJsonVal = prepare(AList),
     AlertJson = {struct, [{<<"type">>, <<"alert">>}, {<<"alert">>, AlertJsonVal}]},
     Ctx#context{alert_set=false, alert_list=[], output=[AlertJson | Output]};
+prepare_status(Term, Ctx=#context{alert_set=true, alert_list=AList}) ->
+    Ctx#context{alert_list=[Term | AList]};
 prepare_status({list, Data}, Ctx=#context{output=Output}) ->
     Ctx#context{output=[prepare_list(Data) | Output]};
 prepare_status({list, Title, Data}, Ctx=#context{output=Output}) ->