aboutsummaryrefslogtreecommitdiffstats
path: root/lib/sasl
diff options
context:
space:
mode:
authorSiri Hansen <siri@erlang.org>2013-06-25 10:11:37 +0200
committerSiri Hansen <siri@erlang.org>2013-06-25 10:11:37 +0200
commit2508a426a07855eea182ecaa623222754776217b (patch)
tree13007a45eed3534ecbb7aabd0efdb4eda6995293 /lib/sasl
parent4c3b306184d886678d08949bcbe0186af8f984b1 (diff)
downloadotp-2508a426a07855eea182ecaa623222754776217b.tar.gz
otp-2508a426a07855eea182ecaa623222754776217b.tar.bz2
otp-2508a426a07855eea182ecaa623222754776217b.zip
[sasl] Remove directory with unicode characters after successful test
This is to avoid lingering files after test runs on windows, since the cleanup script often does not succeed in removing files with unicode characters.
Diffstat (limited to 'lib/sasl')
-rw-r--r--lib/sasl/test/systools_SUITE.erl6
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/sasl/test/systools_SUITE.erl b/lib/sasl/test/systools_SUITE.erl
index 367cab1d77..3921b2d3bb 100644
--- a/lib/sasl/test/systools_SUITE.erl
+++ b/lib/sasl/test/systools_SUITE.erl
@@ -59,6 +59,7 @@
-export([otp_6226_outdir/1]).
-export([init_per_suite/1, end_per_suite/1,
init_per_testcase/2, end_per_testcase/2]).
+-export([delete_tree/1]).
-import(lists, [foldl/3]).
@@ -299,6 +300,11 @@ unicode_script(Config) when is_list(Config) ->
%% 3. path (directory name where unicode_app.tgz is extracted)
true = lists:member({path,[P1]},Instr),
+ %% If all is good, delete the unicode dir to avoid lingering files
+ %% on windows.
+ rpc:call(Node,code,add_pathz,[filename:dirname(code:which(?MODULE))]),
+ rpc:call(Node,?MODULE,delete_tree,[UnicodeLibDir]),
+
ok.
unicode_script(cleanup,Config) ->