From ba70aace96ed73138496744f7d90c2666428eafc Mon Sep 17 00:00:00 2001 From: Peter Harpending Date: Mon, 8 Jun 2026 14:55:47 -0700 Subject: [PATCH] stuff --- test/ts_utils.erl | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/test/ts_utils.erl b/test/ts_utils.erl index cf74594..f69b8ff 100644 --- a/test/ts_utils.erl +++ b/test/ts_utils.erl @@ -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().