From ca25d44c8bd39a73e81eca4367be92680f22dfaa Mon Sep 17 00:00:00 2001
From: HAMANO Tsukasa <code@cuspy.org>
Date: Wed, 28 Jan 2015 00:00:33 +0900
Subject: [PATCH] fix mod_admin_extra stats command

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

diff --git a/src/mod_admin_extra.erl b/src/mod_admin_extra.erl
index 63703ec4d..5d69d664b 100644
--- a/src/mod_admin_extra.erl
+++ b/src/mod_admin_extra.erl
@@ -1425,14 +1425,14 @@ privacy_set(Username, Host, QueryS) ->
 stats(Name) ->
     case Name of
 	<<"uptimeseconds">> -> trunc(element(1, erlang:statistics(wall_clock))/1000);
-	<<"registeredusers">> -> length(ejabberd_auth:dirty_get_registered_users());
+	<<"registeredusers">> -> lists:foldl(fun(Host, Sum) -> ejabberd_auth:get_vh_registered_users_number(Host) + Sum end, 0, ?MYHOSTS);
 	<<"onlineusersnode">> -> length(ejabberd_sm:dirty_get_my_sessions_list());
 	<<"onlineusers">> -> length(ejabberd_sm:dirty_get_sessions_list())
     end.
 
 stats(Name, Host) ->
     case Name of
-	<<"registeredusers">> -> length(ejabberd_auth:get_vh_registered_users(Host));
+	<<"registeredusers">> -> ejabberd_auth:get_vh_registered_users_number(Host);
 	<<"onlineusers">> -> length(ejabberd_sm:get_vh_session_list(Host))
     end.