diff options
author | Badlop <badlop@process-one.net> | 2008-10-12 12:05:31 +0000 |
---|---|---|
committer | Badlop <badlop@process-one.net> | 2008-10-12 12:05:31 +0000 |
commit | 04981b5e4498fd849ef202eb096b8f1abe5c7366 (patch) | |
tree | 5f512df827c970720e8791bf2b4a2a80f9368493 /src/web/ejabberd_web_admin.erl | |
parent | * src/ejabberd_sm.erl: Update from ctl to commands (EJAB-694) (diff) |
* src/mod_configure.erl: Update calls from ctl to
commands (EJAB-694)
* src/web/ejabberd_web_admin.erl: Likewise
SVN Revision: 1640
Diffstat (limited to 'src/web/ejabberd_web_admin.erl')
-rw-r--r-- | src/web/ejabberd_web_admin.erl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/web/ejabberd_web_admin.erl b/src/web/ejabberd_web_admin.erl index 9497efeb9..cd97edb65 100644 --- a/src/web/ejabberd_web_admin.erl +++ b/src/web/ejabberd_web_admin.erl @@ -2022,7 +2022,7 @@ node_backup_parse_query(Node, Query) -> rpc:call(Node, mnesia, install_fallback, [Path]); "dump" -> - rpc:call(Node, ejabberd_ctl, + rpc:call(Node, ejabberd_admin, dump_to_textfile, [Path]); "load" -> rpc:call(Node, mnesia, @@ -2087,7 +2087,7 @@ node_ports_to_xhtml(Ports, Lang) -> node_ports_parse_query(Node, Ports, Query) -> lists:foreach( - fun({Port, _Module1, _Opts1}) -> + fun({Port, Module1, _Opts1}) -> SPort = integer_to_list(Port), case lists:keysearch("add" ++ SPort, 1, Query) of {value, _} -> @@ -2097,13 +2097,13 @@ node_ports_parse_query(Node, Ports, Query) -> Module = list_to_atom(SModule), {ok, Tokens, _} = erl_scan:string(SOpts ++ "."), {ok, Opts} = erl_parse:parse_term(Tokens), - rpc:call(Node, ejabberd_listener, delete_listener, [Port]), + rpc:call(Node, ejabberd_listener, delete_listener, [Port, Module]), rpc:call(Node, ejabberd_listener, add_listener, [Port, Module, Opts]), throw(submitted); _ -> case lists:keysearch("delete" ++ SPort, 1, Query) of {value, _} -> - rpc:call(Node, ejabberd_listener, delete_listener, [Port]), + rpc:call(Node, ejabberd_listener, delete_listener, [Port, Module1]), throw(submitted); _ -> ok |