File 1792-Fix-xdg-file-testcases-on-windows.patch of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 1792-Fix-xdg-file-testcases-on-windows.patch of Package erlang (Revision d62921b2b3be0a6375339d79b308a5a6)

Currently displaying revision d62921b2b3be0a6375339d79b308a5a6 , Show latest

From 3707db72929720ab6a93e212c80a81606b7f948f Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas@erlang.org>
Date: Mon, 10 Jan 2022 08:57:40 +0100
Subject: [PATCH 12/12] Fix xdg file testcases on windows

---
 lib/compiler/test/compile_SUITE.erl        | 2 +-
 lib/dialyzer/test/plt_SUITE.erl            | 2 +-
 lib/kernel/test/erl_distribution_SUITE.erl | 2 +-
 lib/kernel/test/init_SUITE.erl             | 2 +-
 4 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/lib/compiler/test/compile_SUITE.erl b/lib/compiler/test/compile_SUITE.erl
index 21d1154be5..7599fa0642 100644
--- a/lib/compiler/test/compile_SUITE.erl
+++ b/lib/compiler/test/compile_SUITE.erl
@@ -720,7 +720,7 @@ encrypted_abstr_1(Simple, Target) ->
                   {win32, _} ->
                       [Drive | Path] = filename:split(TestHome),
                       [{"APPDATA", filename:join(TestHome,"AppData")},
-                       {"HOMEDRIVE", Drive}, {"HOMEPATH", Path}];
+                       {"HOMEDRIVE", Drive}, {"HOMEPATH", filename:join(Path)}];
                   _ ->
                       [{"HOME", TestHome}]
               end,
diff --git a/lib/dialyzer/test/plt_SUITE.erl b/lib/dialyzer/test/plt_SUITE.erl
index 3c38b0a483..e1c5ecdd95 100644
--- a/lib/dialyzer/test/plt_SUITE.erl
+++ b/lib/dialyzer/test/plt_SUITE.erl
@@ -91,7 +91,7 @@ build_xdg_plt(Config) ->
                   {win32, _} ->
                       [Drive | Path] = filename:split(TestHome),
                       [{"APPDATA", filename:join(TestHome,"AppData")},
-                       {"HOMEDRIVE", Drive}, {"HOMEPATH", Path}];
+                       {"HOMEDRIVE", Drive}, {"HOMEPATH", filename:join(Path)}];
                   _ ->
                       [{"HOME", TestHome}]
               end,
diff --git a/lib/kernel/test/erl_distribution_SUITE.erl b/lib/kernel/test/erl_distribution_SUITE.erl
index fbfe47e2da..a91b728d16 100644
--- a/lib/kernel/test/erl_distribution_SUITE.erl
+++ b/lib/kernel/test/erl_distribution_SUITE.erl
@@ -2318,7 +2318,7 @@ xdg_cookie(Config) when is_list(Config) ->
               {win32, _} ->
                   [Drive | Path] = filename:split(TestHome),
                   [{"APPDATA", filename:join(TestHome,"AppData")},
-                   {"HOMEDRIVE", Drive}, {"HOMEPATH", Path}];
+                   {"HOMEDRIVE", Drive}, {"HOMEPATH", filename:join(Path)}];
               _ ->
                   [{"HOME", TestHome}]
           end,
diff --git a/lib/kernel/test/init_SUITE.erl b/lib/kernel/test/init_SUITE.erl
index 4301aa2161..e2c756cd8f 100644
--- a/lib/kernel/test/init_SUITE.erl
+++ b/lib/kernel/test/init_SUITE.erl
@@ -676,7 +676,7 @@ dot_erlang(Config) ->
                   {win32, _} ->
                       [Drive | Path] = filename:split(TestHome),
                       [{"APPDATA", filename:join(TestHome,"AppData")},
-                       {"HOMEDRIVE", Drive}, {"HOMEPATH", Path}];
+                       {"HOMEDRIVE", Drive}, {"HOMEPATH", filename:join(Path)}];
                   _ ->
                       [{"HOME", TestHome}]
               end,
-- 
2.31.1

Places

File 1792-Fix-xdg-file-testcases-on-windows.patch of Package erlang (Revision d62921b2b3be0a6375339d79b308a5a6)

Places