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;