diff options
author | Tristan Sloughter <[email protected]> | 2013-02-07 12:19:10 -0800 |
---|---|---|
committer | Tristan Sloughter <[email protected]> | 2013-02-07 12:19:10 -0800 |
commit | 6d27a1af18f8337bbcfd3994787bf8725b94868a (patch) | |
tree | 93feb4e317d35d9d69443551b83175d21a0a0808 /test/rclt_discover_SUITE.erl | |
parent | aac84f08f2b557ae2a7bf45001c47aec503203ab (diff) | |
parent | 6734e9ec4e0dd4c0678d10e8b8e48552ffb4e995 (diff) | |
download | relx-6d27a1af18f8337bbcfd3994787bf8725b94868a.tar.gz relx-6d27a1af18f8337bbcfd3994787bf8725b94868a.tar.bz2 relx-6d27a1af18f8337bbcfd3994787bf8725b94868a.zip |
Merge pull request #28 from erlware/next
Next
Diffstat (limited to 'test/rclt_discover_SUITE.erl')
-rw-r--r-- | test/rclt_discover_SUITE.erl | 15 |
1 files changed, 7 insertions, 8 deletions
diff --git a/test/rclt_discover_SUITE.erl b/test/rclt_discover_SUITE.erl index 63d7841..4b6cb2a 100644 --- a/test/rclt_discover_SUITE.erl +++ b/test/rclt_discover_SUITE.erl @@ -1,4 +1,4 @@ -%%% -*- mode: Erlang; fill-column: 80; comment-column: 75; -*- +%% -*- erlang-indent-level: 4; indent-tabs-mode: nil; fill-column: 92 -*- %%% Copyright 2012 Erlware, LLC. All Rights Reserved. %%% %%% This file is provided to you under the Apache License, @@ -46,7 +46,7 @@ init_per_testcase(_, Config) -> LibDir2 = filename:join([DataDir, create_random_name("lib_dir2_")]), ok = rcl_util:mkdir_p(LibDir1), ok = rcl_util:mkdir_p(LibDir2), - State = rcl_state:new([{lib_dirs, [LibDir1, LibDir2]}], []), + State = rcl_state:new([{lib_dirs, [LibDir1, LibDir2]}], release), [{lib1, LibDir1}, {lib2, LibDir2}, {state, State} | Config]. @@ -62,8 +62,8 @@ normal_case(Config) -> end)(App) || App <- - [{create_random_name("lib_app1_"), create_random_vsn()} - || _ <- lists:seq(1, 100)]], + [{create_random_name("lib_app1_"), create_random_vsn()} + || _ <- lists:seq(1, 100)]], LibDir2 = proplists:get_value(lib2, Config), Apps2 = [(fun({Name, Vsn}) -> @@ -71,10 +71,9 @@ normal_case(Config) -> end)(App) || App <- [{create_random_name("lib_app2_"), create_random_vsn()} - || _ <- lists:seq(1, 100)]], - State0 = rcl_state:put(rcl_state:put(proplists:get_value(state, Config), - discover_exclude_rebar, true), - discover_exclude_system, true), + || _ <- lists:seq(1, 100)]], + State0 = rcl_state:put(proplists:get_value(state, Config), + disable_default_libs, true), {DiscoverProvider, {ok, State1}} = rcl_provider:new(rcl_prv_discover, State0), {ok, State2} = rcl_provider:do(DiscoverProvider, State1), lists:foreach(fun(App) -> |