Chapril/xmpp.chapril.org-ejabberd
25
1
Fork 0
mirror of https://github.com/processone/ejabberd.git synced 2024-12-22 17:28:25 +01:00
Code Releases Activity

Speedup table setup, no io if EJABBERD_SCHEMA_PATH not set (#1461)

Browse Source
This commit is contained in:
Christophe Romain 2017-01-17 14:22:12 +01:00
parent c7476875e6
commit 2ce6d49a40
1 changed files with 9 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/ejabberd_mnesia.erl
View File

@ -117,19 +117,15 @@ merge(TabDef, CustomDef) ->
lists:ukeysort(1, CleanDef)). lists:ukeysort(1, CleanDef)).
parse(Module) -> parse(Module) ->
Path = case os:getenv("EJABBERD_SCHEMA_PATH") of case os:getenv("EJABBERD_SCHEMA_PATH") of
false -> false ->
case code:priv_dir(ejabberd) of {error, undefined};
{error, _} -> "schema"; % $SPOOL_DIR/schema Path ->
Priv -> filename:join(Priv, "schema") File = filename:join(Path, atom_to_list(Module)++".mnesia"),
end; case file:consult(File) of
CustomDir -> {ok, Terms} -> parse(Terms, []);
CustomDir Error -> Error
end, end
File = filename:join(Path, atom_to_list(Module)++".mnesia"),
case file:consult(File) of
{ok, Terms} -> parse(Terms, []);
Error -> Error
end. end.
parse([], Acc) -> parse([], Acc) ->