From 36033303874fb10e0b15b6ab8b08f33db041d7d4 Mon Sep 17 00:00:00 2001
From: Alexey Shchepin <alexey@process-one.net>
Date: Sat, 6 Aug 2005 22:23:53 +0000
Subject: [PATCH] * src/web/ejabberd_web_admin.erl: Bugfix (thanks to Badlop)

SVN Revision: 403
---
 ChangeLog                      | 4 ++++
 src/web/ejabberd_web_admin.erl | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 22e0f3efa..117f82cd0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2005-08-07  Alexey Shchepin  <alexey@sevcom.net>
+
+	* src/web/ejabberd_web_admin.erl: Bugfix (thanks to Badlop)
+
 2005-08-05  Alexey Shchepin  <alexey@sevcom.net>
 
 	* src/win32/inetrc: Added (thanks to Sergei Golovan)
diff --git a/src/web/ejabberd_web_admin.erl b/src/web/ejabberd_web_admin.erl
index d3d7ffa01..322adde37 100644
--- a/src/web/ejabberd_web_admin.erl
+++ b/src/web/ejabberd_web_admin.erl
@@ -1972,7 +1972,7 @@ get_node(global, Node, ["ports"], Query, Lang) ->
 	];
 
 get_node(Host, Node, ["modules"], Query, Lang) when is_list(Host) ->
-    Modules = rpc:call(Node, gen_mod, loaded_modules_with_opts, []),
+    Modules = rpc:call(Node, gen_mod, loaded_modules_with_opts, [Host]),
     Res = case catch node_modules_parse_query(Host, Node, Modules, Query) of
 	      submitted ->
 		  ok;