From 5751b55013229802694c2635487e9eb579c412b5 Mon Sep 17 00:00:00 2001
From: David Allsopp <david.allsopp@metastack.com>
Date: Mon, 6 Nov 2023 10:42:22 +0000
Subject: [PATCH] Proposal: forward-to-back for "target"

i.e. also convert the forward slashes to back-slashes
---
 src/state/opamEnv.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/state/opamEnv.ml b/src/state/opamEnv.ml
index 43d8e1abd03..143dfefa716 100644
--- a/src/state/opamEnv.ml
+++ b/src/state/opamEnv.ml
@@ -58,7 +58,7 @@ let transform_format ~(sepfmt:sep_path_format) =
     let translate =
       match format with
       | Target | Target_quoted ->
-        fun x -> x
+        OpamSystem.forward_to_back
       | Host | Host_quoted ->
         (* noop on non windows *)
         (Lazy.force OpamSystem.get_cygpath_path_transform) ~pathlist:false