From 9d09ccc99aa7d8ae156ffd2bf6d61c8365299fab Mon Sep 17 00:00:00 2001
From: Dave Smith <dizzyd@dizzyd.com>
Date: Tue, 22 Jun 2010 14:31:31 -0600
Subject: Adding support for restricting eunit to a specific application

---
 src/rebar_eunit.erl | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/rebar_eunit.erl b/src/rebar_eunit.erl
index bd93a48..e302481 100644
--- a/src/rebar_eunit.erl
+++ b/src/rebar_eunit.erl
@@ -54,7 +54,19 @@
 %% Public API
 %% ===================================================================
 
-eunit(Config, _File) ->
+eunit(Config, AppFile) ->
+    %% Check for app global parameter; this ia comma-delimited list of apps
+    %% on which we want to run eunit
+    TargetApps = [list_to_atom(A) || A <- string:tokens(rebar_config:get_global(app, []), ",")],
+    ThisApp = rebar_app_utils:app_name(AppFile),
+    case lists:member(ThisApp, TargetApps) of
+        true ->
+            ok;
+        false ->
+            ?CONSOLE("Skipping eunit on app ~p\n", [ThisApp]),
+            throw(ok)
+    end,
+
     %% Make sure ?EUNIT_DIR/ directory exists (tack on dummy module)
     ok = filelib:ensure_dir(?EUNIT_DIR ++ "/foo"),
 
-- 
cgit v1.1