aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEvgeny Khramtsov <ekhramtsov@process-one.net>2019-07-17 20:51:33 +0300
committerEvgeny Khramtsov <ekhramtsov@process-one.net>2019-07-17 20:51:33 +0300
commitc5305c5f9a3b308ce30dcbbe89930c335ed07c82 (patch)
tree0329d796a7e0b32fb23c314e8132360d691c857b
parentFix pending nodes retrieval for SQL backend (diff)
Improve RPC calls in mod_configure
-rw-r--r--src/mod_configure.erl14
1 files changed, 9 insertions, 5 deletions
diff --git a/src/mod_configure.erl b/src/mod_configure.erl
index a413b69ac..0e0151cda 100644
--- a/src/mod_configure.erl
+++ b/src/mod_configure.erl
@@ -1135,7 +1135,9 @@ set_form(_From, _Host,
Txt = ?T("No 'path' found in data form"),
{error, xmpp:err_bad_request(Txt, Lang)};
[String] ->
- case ejabberd_cluster:call(Node, mnesia, backup, [String]) of
+ case ejabberd_cluster:call(
+ Node, mnesia, backup, [binary_to_list(String)],
+ timer:minutes(10)) of
{badrpc, Reason} ->
?ERROR_MSG("RPC call mnesia:backup(~s) to node ~s "
"failed: ~p", [String, Node, Reason]),
@@ -1166,8 +1168,9 @@ set_form(_From, _Host,
Txt = ?T("No 'path' found in data form"),
{error, xmpp:err_bad_request(Txt, Lang)};
[String] ->
- case ejabberd_cluster:call(Node, ejabberd_admin,
- restore, [String]) of
+ case ejabberd_cluster:call(
+ Node, ejabberd_admin, restore,
+ [String], timer:minutes(10)) of
{badrpc, Reason} ->
?ERROR_MSG("RPC call ejabberd_admin:restore(~s) to node "
"~s failed: ~p", [String, Node, Reason]),
@@ -1198,8 +1201,9 @@ set_form(_From, _Host,
Txt = ?T("No 'path' found in data form"),
{error, xmpp:err_bad_request(Txt, Lang)};
[String] ->
- case ejabberd_cluster:call(Node, ejabberd_admin,
- dump_to_textfile, [String]) of
+ case ejabberd_cluster:call(
+ Node, ejabberd_admin, dump_to_textfile,
+ [String], timer:minutes(10)) of
{badrpc, Reason} ->
?ERROR_MSG("RPC call ejabberd_admin:dump_to_textfile(~s) "
"to node ~s failed: ~p", [String, Node, Reason]),