rebar_qc: use lists:flatmap/2

1 files changed, 2 insertions, 1 deletions

diff --git a/src/rebar_qc.erl b/src/rebar_qc.erl
index 479049f..051400f 100644
--- a/src/rebar_qc.erl
+++ b/src/rebar_qc.erl
@@ -119,7 +119,8 @@ run(Config, QC, QCOpts) ->
     %% as well.
     {ok, _SrcErls} = rebar_erlc_compiler:test_compile(Config),
 
-    case lists:flatten([qc_module(QC, QCOpts, M) || M <- find_prop_mods()]) of
+    TestModule = fun(M) -> qc_module(QC, QCOpts, M) end,
+    case lists:flatmap(TestModule, find_prop_mods()) of
         [] ->
             true = code:set_path(CodePath),
             ok;