* src/web/ejabberd_web_admin.erl: Make the web interface pages

"translatable" (Thanks to Badlop) (EJAB-11).

SVN Revision: 902
This commit is contained in:
Mickaël Rémond 2007-08-31 16:13:35 +00:00
parent 6cc2042fec
commit 2c57215904
2 changed files with 10 additions and 5 deletions

View File

@ -1,3 +1,8 @@
2007-08-31 Mickael Remond <mremond@process-one.net>
* src/web/ejabberd_web_admin.erl: Make the web interface pages
"translatable" (Thanks to Badlop) (EJAB-11).
2007-08-29 Alexey Shchepin <alexey@process-one.net> 2007-08-29 Alexey Shchepin <alexey@process-one.net>
* src/ejabberd.cfg.example: Updated mod_muc 'host' option default * src/ejabberd.cfg.example: Updated mod_muc 'host' option default

View File

@ -1,15 +1,15 @@
%%%---------------------------------------------------------------------- %%%----------------------------------------------------------------------
%%% File : ejabberd_web_admin.erl %%% File : ejabberd_web_admin.erl
%%% Author : Alexey Shchepin <alexey@sevcom.net> %%% Author : Alexey Shchepin <alexey@process-one.net>
%%% Purpose : Administration web interface %%% Purpose : Administration web interface
%%% Created : 9 Apr 2004 by Alexey Shchepin <alexey@sevcom.net> %%% Created : 9 Apr 2004 by Alexey Shchepin <alexey@process-one.net>
%%%---------------------------------------------------------------------- %%%----------------------------------------------------------------------
%%% Copyright (c) 2004-2006 Alexey Shchepin %%% Copyright (c) 2004-2006 Alexey Shchepin
%%% Copyright (c) 2004-2006 Process One %%% Copyright (c) 2004-2006 Process One
%%%---------------------------------------------------------------------- %%%----------------------------------------------------------------------
-module(ejabberd_web_admin). -module(ejabberd_web_admin).
-author('alexey@sevcom.net'). -author('alexey@process-one.net').
%% External exports %% External exports
-export([process/2, -export([process/2,
@ -1871,8 +1871,8 @@ get_node(global, Node, ["update"], Query, Lang) ->
get_node(Host, Node, NPath, Query, Lang) -> get_node(Host, Node, NPath, Query, Lang) ->
{Hook, Opts} = case Host of {Hook, Opts} = case Host of
global -> {webadmin_page_node, [Node, NPath, Query]}; global -> {webadmin_page_node, [Node, NPath, Query, Lang]};
Host -> {webadmin_page_hostnode, [Host, Node, NPath, Query]} Host -> {webadmin_page_hostnode, [Host, Node, NPath, Query, Lang]}
end, end,
case ejabberd_hooks:run_fold(Hook, Host, [], Opts) of case ejabberd_hooks:run_fold(Hook, Host, [], Opts) of
[] -> [?XC("h1", "Not Found")]; [] -> [?XC("h1", "Not Found")];