From f10de6439b345a584249dd63134a96966e49b9a0 Mon Sep 17 00:00:00 2001
From: Evgeny Khramtsov <ekhramtsov@process-one.net>
Date: Tue, 16 Jul 2019 15:09:51 +0300
Subject: [PATCH] Fix 'get-pending' command form generation

---
 src/mod_pubsub.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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 ->