stuff
This commit is contained in:
+10
-2
@@ -32,6 +32,10 @@ test_deps() ->
|
|||||||
|
|
||||||
|
|
||||||
load_dep(D) ->
|
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 =
|
ok =
|
||||||
case zx_lib:installed(D) of
|
case zx_lib:installed(D) of
|
||||||
false ->
|
false ->
|
||||||
@@ -41,7 +45,9 @@ load_dep(D) ->
|
|||||||
true ->
|
true ->
|
||||||
ok
|
ok
|
||||||
end,
|
end,
|
||||||
zx_daemon:build(D).
|
Result = zx_daemon:build(D),
|
||||||
|
ok = file:set_cwd(Cwd),
|
||||||
|
Result.
|
||||||
|
|
||||||
|
|
||||||
-spec clean_after(Fun) -> Result when
|
-spec clean_after(Fun) -> Result when
|
||||||
@@ -70,7 +76,9 @@ tidily(Fun) ->
|
|||||||
-spec delete_beams() -> ok.
|
-spec delete_beams() -> ok.
|
||||||
|
|
||||||
delete_beams() ->
|
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() ->
|
tidy() ->
|
||||||
delete_beams().
|
delete_beams().
|
||||||
|
|||||||
Reference in New Issue
Block a user