From: Evgeny Khramtsov <ekhramtsov@process-one.net>
Date: Tue, 16 Jul 2019 12:09:51 +0000 (+0300)
Subject: Fix 'get-pending' command form generation
X-Git-Tag: 19.08~71
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=f10de6439b345a584249dd63134a96966e49b9a0;p=ejabberd

Fix 'get-pending' command form generation
---

diff --git a/src/mod_pubsub.erl b/src/mod_pubsub.erl
index 706edc419..54ebdc7cf 100644
--- a/src/mod_pubsub.erl
+++ b/src/mod_pubsub.erl
@@ -1284,9 +1284,9 @@ send_pending_node_form(Host, Owner, Lang, Plugins) ->
 	Ps ->
 	    case get_pending_nodes(Host, Owner, Ps) of
 		{ok, Nodes} ->
+		    Form = [{node, <<>>, lists:zip(Nodes, Nodes)}],
 		    XForm = #xdata{type = form,
-				   fields = pubsub_get_pending:encode(
-					      [{node, Nodes}], Lang)},
+				   fields = pubsub_get_pending:encode(Form, Lang)},
 		    #adhoc_command{status = executing, action = execute,
 				   xdata = XForm};
 		Err ->