Add ejabberd command to get the current loglevel (EJAB-1004)

SVN Revision: 2447

diff --git a/src/ejabberd_admin.erl b/src/ejabberd_admin.erl
index 5e81a2b373552804a7f99c94c69f8f3e381a5c6c..e2c95da910a3207e4aa0d9f792f8093be66c9a69 100644 (file)
--- a/src/ejabberd_admin.erl
+++ b/src/ejabberd_admin.erl
@@ -79,6 +79,14 @@ commands() ->
                        desc = "Reopen the log files",
                        module = ?MODULE, function = reopen_log,
                        args = [], result = {res, rescode}},
+     #ejabberd_commands{name = get_loglevel, tags = [logs, server],
+                       desc = "Get the current loglevel",
+                       module = ejabberd_loglevel, function = get,
+                       args = [],
+                        result = {leveltuple, {tuple, [{levelnumber, integer},
+                                                       {levelatom, atom},
+                                                       {leveldesc, string}
+                                                      ]}}},
 
      #ejabberd_commands{name = register, tags = [accounts],
                        desc = "Register a user",