diff options
| -rw-r--r-- | test/elixir_SUITE.erl | 11 | ||||
| -rw-r--r-- | test/suite.erl | 8 |
2 files changed, 15 insertions, 4 deletions
diff --git a/test/elixir_SUITE.erl b/test/elixir_SUITE.erl index 48cc94f8e..835c81052 100644 --- a/test/elixir_SUITE.erl +++ b/test/elixir_SUITE.erl @@ -18,6 +18,17 @@ -compile(export_all). init_per_suite(Config) -> + case code:lib_dir(ejabberd) of + {error, _} -> + DataDir = proplists:get_value(data_dir, Config), + {ok, CWD} = file:get_cwd(), + NewEjPath = filename:join([CWD, "ejabberd-0.0.1"]), + TopDir = filename:dirname(filename:dirname(filename:dirname(DataDir))), + ok = file:make_symlink(TopDir, NewEjPath), + code:replace_path(ejabberd, NewEjPath); + _ -> + ok + end, check_meck(), code:add_pathz(filename:join(test_dir(), "../include")), Config. diff --git a/test/suite.erl b/test/suite.erl index 22e328fe9..bcd54bef3 100644 --- a/test/suite.erl +++ b/test/suite.erl @@ -47,10 +47,10 @@ init_config(Config) -> ]), ConfigPath = filename:join([CWD, "ejabberd.yml"]), ok = file:write_file(ConfigPath, CfgContent), - ok = file:make_dir(filename:join([CWD, "priv"])), - ok = file:make_dir(filename:join([CWD, "priv", "sql"])), - {ok, _} = file:copy(filename:join([DataDir, "..", "..", "sql", "lite.sql"]), - filename:join([CWD, "priv", "sql", "lite.sql"])), + NewEjPath = filename:join([CWD, "ejabberd-0.0.1"]), + TopDir = filename:dirname(filename:dirname(DataDir)), + ok = file:make_symlink(TopDir, NewEjPath), + code:replace_path(ejabberd, NewEjPath), ok = application:load(sasl), ok = application:load(mnesia), ok = application:load(ejabberd), |