diff options
| author | Dan Gudmundsson <[email protected]> | 2013-03-26 11:32:08 +0100 |
|---|---|---|
| committer | Dan Gudmundsson <[email protected]> | 2013-03-26 11:32:08 +0100 |
| commit | 618d8907ece11d07aae5f80126ef20a6d00a9fa7 (patch) | |
| tree | e3a11aca279e5ba37a9224e7fa2ca4e850dc1b21 /lib/stdlib/test/escript_SUITE.erl | |
| parent | 08037cc37e1bc116c44ee7665f7316b6d0dfecba (diff) | |
| parent | 61613acb659553004538ad13ded3d6bf343bf6a7 (diff) | |
| download | otp-618d8907ece11d07aae5f80126ef20a6d00a9fa7.tar.gz otp-618d8907ece11d07aae5f80126ef20a6d00a9fa7.tar.bz2 otp-618d8907ece11d07aae5f80126ef20a6d00a9fa7.zip | |
Merge branch 'maint'
Diffstat (limited to 'lib/stdlib/test/escript_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/escript_SUITE.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/stdlib/test/escript_SUITE.erl b/lib/stdlib/test/escript_SUITE.erl index b6cdd0a9c7..eebfec3336 100644 --- a/lib/stdlib/test/escript_SUITE.erl +++ b/lib/stdlib/test/escript_SUITE.erl @@ -615,7 +615,7 @@ archive_script_file_access(Config) when is_list(Config) -> %% 3. If symlinks are supported, run one of the scripts via a symlink. %% %% This is in order to test error b) described above this test case. - case file:read_link(Symlink2) of + case element(1,os:type()) =:= win32 orelse file:read_link(Symlink2) of {ok,_} -> run(PrivDir, "./" ++ SymlinkName2 ++ " " ++ ScriptName2, [<<"ExitCode:0">>]); |