diff --git a/src/web/ejabberd_http_bind.erl b/src/web/ejabberd_http_bind.erl
index bc1d1d71d..bcc3be054 100644
--- a/src/web/ejabberd_http_bind.erl
+++ b/src/web/ejabberd_http_bind.erl
@@ -1040,7 +1040,7 @@ send_outpacket(#http_bind{pid = FsmRef}, OutPacket) ->
 			  end, OutPacket),
 	    case AllElements of
 		true ->
-		    TypedEls = lists:foldr(fun({xmlstreamelement, El}, Acc) ->
+		    TypedEls = lists:foldl(fun({xmlstreamelement, El}, Acc) ->
 						   Acc ++ 
 						       [xml:element_to_string(
 							  check_default_xmlns(El)