diff options
| author | Magnus Lidén <[email protected]> | 2014-07-02 09:42:19 +0200 |
|---|---|---|
| committer | Magnus Lidén <[email protected]> | 2014-07-02 09:42:19 +0200 |
| commit | fbc5f26d8f00277aca13fd97a0eef2423446c249 (patch) | |
| tree | 2128e7a886d14c27f05bd63af068f875b6f839ef /lib/edoc/test/edoc_SUITE.erl | |
| parent | d2ade9b27432a1f7342e231d0d8b12467c3d3d77 (diff) | |
| parent | a7176f9186ffd7eb2b26daca2264d425383cf6a7 (diff) | |
| download | otp-fbc5f26d8f00277aca13fd97a0eef2423446c249.tar.gz otp-fbc5f26d8f00277aca13fd97a0eef2423446c249.tar.bz2 otp-fbc5f26d8f00277aca13fd97a0eef2423446c249.zip | |
Merge branch 'maint-17' into maint
Diffstat (limited to 'lib/edoc/test/edoc_SUITE.erl')
| -rw-r--r-- | lib/edoc/test/edoc_SUITE.erl | 22 |
1 files changed, 20 insertions, 2 deletions
diff --git a/lib/edoc/test/edoc_SUITE.erl b/lib/edoc/test/edoc_SUITE.erl index c9c7811afb..c63660c8c0 100644 --- a/lib/edoc/test/edoc_SUITE.erl +++ b/lib/edoc/test/edoc_SUITE.erl @@ -22,12 +22,12 @@ init_per_group/2,end_per_group/2]). %% Test cases --export([app/1,appup/1,build_std/1,build_map_module/1]). +-export([app/1,appup/1,build_std/1,build_map_module/1,otp_12008/1]). suite() -> [{ct_hooks,[ts_install_cth]}]. all() -> - [app,appup,build_std,build_map_module]. + [app,appup,build_std,build_map_module,otp_12008]. groups() -> []. @@ -77,3 +77,21 @@ build_map_module(Config) when is_list(Config) -> Filename = filename:join(DataDir, "map_module.erl"), ok = edoc:file(Filename, [{dir, PrivDir}]), ok. + +otp_12008(Config) when is_list(Config) -> + DataDir = ?config(data_dir, Config), + PrivDir = ?config(priv_dir, Config), + Un1 = filename:join(DataDir, "un1.erl"), + Un2 = filename:join(DataDir, "un2.erl"), + Un3 = filename:join(DataDir, "un3.erl"), + %% epp_dodger + Opts1 = [{dir, PrivDir}], + ok = edoc:files([Un1], Opts1), + ok = edoc:files([Un2], Opts1), + {'EXIT', error} = (catch edoc:files([Un3], Opts1)), + %% epp + Opts2 = [{preprocess, true}, {dir, PrivDir}], + ok = edoc:files([Un1], Opts2), + ok = edoc:files([Un2], Opts2), + {'EXIT', error} = (catch edoc:files([Un3], Opts2)), + ok. |