From 9a11db91f964073d20311ae459d5cfdc3047f156 Mon Sep 17 00:00:00 2001
From: Evgeniy Khramtsov <ekhramtsov@process-one.net>
Date: Wed, 27 Jun 2018 13:36:58 +0300
Subject: [PATCH] Use lists:foldl/3

---
 src/mod_http_upload.erl | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/src/mod_http_upload.erl b/src/mod_http_upload.erl
index ef7eaee47..3d4f3e56b 100644
--- a/src/mod_http_upload.erl
+++ b/src/mod_http_upload.erl
@@ -689,13 +689,12 @@ iq_disco_info(Host, Lang, Name, AddInfo) ->
 	       infinity ->
 		   AddInfo;
 	       MaxSize ->
-		   XData = lists:map(
-			     fun(NS) ->
-				     Fs = http_upload:encode(
-					    [{'max-file-size', MaxSize}], NS, Lang),
-				     #xdata{type = result, fields = Fs}
-			     end, [?NS_HTTP_UPLOAD, ?NS_HTTP_UPLOAD_0]),
-		   XData ++ AddInfo
+		   lists:foldl(
+		     fun(NS, Acc) ->
+			     Fs = http_upload:encode(
+				    [{'max-file-size', MaxSize}], NS, Lang),
+			     [#xdata{type = result, fields = Fs}|Acc]
+		     end, AddInfo, [?NS_HTTP_UPLOAD_0, ?NS_HTTP_UPLOAD])
 	   end,
     #disco_info{identities = [#identity{category = <<"store">>,
 					type = <<"file">>,