try to avoid Windows MAX_PATH limit, by using \\?\ prefix on git repo path

1 files changed, 1 insertions, 1 deletions

diff --git a/Annex.hs b/Annex.hs
index 82a378f79..7806a9129 100644
--- a/Annex.hs
+++ b/Annex.hs
@@ -187,7 +187,7 @@ newState c r = AnnexState
  - Ensures the config is read, if it was not already. -}
 new :: Git.Repo -> IO AnnexState
 new r = do
-	r' <- Git.Config.read r
+	r' <- Git.adjustPath <$> Git.Config.read r
 	let c = extractGitConfig r'
 	newState c <$> if annexDirect c then fixupDirect r' else return r'