aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2016-03-21 11:50:21 +0100
committerBjörn Gustavsson <[email protected]>2016-03-23 13:28:09 +0100
commitad653a88f4766712f4a5a4aba7a7244186a42ba6 (patch)
treef5d2332204a0e90126b461993b1801b8f7420028
parent9dc0ee41b00ca40fec933266d08a59c38848d9a9 (diff)
downloadotp-ad653a88f4766712f4a5a4aba7a7244186a42ba6.tar.gz
otp-ad653a88f4766712f4a5a4aba7a7244186a42ba6.tar.bz2
otp-ad653a88f4766712f4a5a4aba7a7244186a42ba6.zip
code_SUITE: Skip on_load_embedded/1 if no symlinks
On Windows, we might not have permission to create symlinks. Skip the test case instead of failing.
-rw-r--r--lib/kernel/test/code_SUITE.erl3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/kernel/test/code_SUITE.erl b/lib/kernel/test/code_SUITE.erl
index abea23e854..1b7672d362 100644
--- a/lib/kernel/test/code_SUITE.erl
+++ b/lib/kernel/test/code_SUITE.erl
@@ -1221,6 +1221,9 @@ on_load_embedded_1(Config) ->
case file:make_symlink(OnLoadApp, LinkName) of
{error,enotsup} ->
throw({skip,"Support for symlinks required"});
+ {error,eperm} ->
+ %% On Windows, we may not have permissions to create symlinks.
+ throw({skip,"Support for symlinks required"});
ok -> ok
end,