0
@@ -202,10 +202,7 @@ build_command(Parts) when is_list(Parts) ->
0
   lists:reverse([$\n,$\r|lists:foldl(fun build_command/2, [], Parts)]).
0
 
0
 build_command(Part, Message) when is_list(Message) ->
0
-  reverse_onto(case Message of [] -> []; _ -> [32|Message] end, to_string(Part)).
0
-
0
-reverse_onto(Ys, Xs) when is_list(Ys), is_list(Xs) ->
0
-  lists:foldl(fun(X, Acc) -> [X|Acc] end, Ys, Xs).
0
+  lists:reverse(to_string(Part), case Message of [] -> []; _ -> [32|Message] end).
0
 
0
 to_string(Int) when is_integer(Int) ->
0
   integer_to_list(Int);