From d1569a9d46979275117290ab3ea07b631907e6d2 Mon Sep 17 00:00:00 2001 From: alisdair sullivan Date: Sat, 11 Apr 2015 14:45:08 -0700 Subject: disallow suites in project root fixes #331 --- src/rebar_prv_common_test.erl | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/src/rebar_prv_common_test.erl b/src/rebar_prv_common_test.erl index 7602906..d183317 100644 --- a/src/rebar_prv_common_test.erl +++ b/src/rebar_prv_common_test.erl @@ -70,6 +70,8 @@ format_error({failures_running_tests, {Failed, AutoSkipped}}) -> io_lib:format("Failures occured running tests: ~b", [Failed+AutoSkipped]); format_error({error_running_tests, Reason}) -> io_lib:format("Error running tests: ~p", [Reason]); +format_error(suite_at_project_root) -> + io_lib:format("Test suites can't be located in project root", []); format_error({error, Reason}) -> io_lib:format("Unknown error: ~p", [Reason]). @@ -269,6 +271,10 @@ find_suite_dirs(Suites) -> lists:usort(AllDirs). copy(State, Target) -> + case reduce_path(Target) == rebar_state:dir(State) of + true -> erlang:error(suite_at_project_root); + false -> ok + end, case retarget_path(State, Target) of %% directory lies outside of our project's file structure so %% don't copy it -- cgit v1.1