stuff
This commit is contained in:
+10
-2
@@ -32,6 +32,10 @@ test_deps() ->
|
||||
|
||||
|
||||
load_dep(D) ->
|
||||
{ok, Cwd} = file:get_cwd(),
|
||||
% apparently zx changes the working dir when doing
|
||||
% all this stuff so beam files get dropped in
|
||||
% random dep dir
|
||||
ok =
|
||||
case zx_lib:installed(D) of
|
||||
false ->
|
||||
@@ -41,7 +45,9 @@ load_dep(D) ->
|
||||
true ->
|
||||
ok
|
||||
end,
|
||||
zx_daemon:build(D).
|
||||
Result = zx_daemon:build(D),
|
||||
ok = file:set_cwd(Cwd),
|
||||
Result.
|
||||
|
||||
|
||||
-spec clean_after(Fun) -> Result when
|
||||
@@ -70,7 +76,9 @@ tidily(Fun) ->
|
||||
-spec delete_beams() -> ok.
|
||||
|
||||
delete_beams() ->
|
||||
lists:map(fun file:delete/1, ls_test_beams()).
|
||||
Beams = ls_test_beams(),
|
||||
%io:format("Deleting: ~tp~n", [Beams]),
|
||||
lists:foreach(fun file:delete/1, Beams).
|
||||
|
||||
tidy() ->
|
||||
delete_beams().
|
||||
|
||||
Reference in New Issue
Block a user