diff options
| author | Remco Wendt <remco@maykinmedia.nl> | 2012-12-03 19:16:33 +0400 |
|---|---|---|
| committer | Alexey Shchepin <alexey@process-one.net> | 2012-12-19 17:00:57 +0400 |
| commit | d81eb95cab790e881a2afd3a3eef17a6d855778c (patch) | |
| tree | 6e6e4177eb982f59df62a66a368667a59ba5461c | |
| parent | 1f290c8a29b306a4de718ded2716c289a2ac641a (diff) | |
Added command to list all the vhosts registered in an ejabberd node
| -rw-r--r-- | src/ejabberd_admin.erl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/ejabberd_admin.erl b/src/ejabberd_admin.erl index e729e4ce0..b4f3fe8db 100644 --- a/src/ejabberd_admin.erl +++ b/src/ejabberd_admin.erl @@ -31,6 +31,7 @@ %% Server status/0, reopen_log/0, stop_kindly/2, send_service_message_all_mucs/2, + registered_vhosts/0, %% Erlang update_list/0, update/1, %% Accounts @@ -128,6 +129,11 @@ commands() -> module = ?MODULE, function = registered_users, args = [{host, string}], result = {users, {list, {username, string}}}}, + #ejabberd_commands{name = registered_vhosts, tags = [server], + desc = "List all registered vhosts in SERVER", + module = ?MODULE, function = registered_vhosts, + args = [], + result = {vhosts, {list, {vhost, string}}}}, #ejabberd_commands{name = import_file, tags = [mnesia], desc = "Import user data from jabberd14 spool file", @@ -348,6 +354,8 @@ registered_users(Host) -> SUsers = lists:sort(Users), lists:map(fun({U, _S}) -> U end, SUsers). +registered_vhosts() -> + ?MYHOSTS. %%% %%% Migration management |