From 82f667e7f24c54b6b579e42268faa247dd586e59 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 6 Jan 2015 16:32:44 -0400 Subject: [PATCH] git repo path may be relative, so don't assume absolute any more Fixes 6 test failures. --- Git/Construct.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Git/Construct.hs b/Git/Construct.hs index eed2b99300..108ee7eb76 100644 --- a/Git/Construct.hs +++ b/Git/Construct.hs @@ -153,7 +153,7 @@ fromRemoteLocation s repo = gen $ parseRemoteLocation s repo fromRemotePath :: FilePath -> Repo -> IO Repo fromRemotePath dir repo = do dir' <- expandTilde dir - fromAbsPath $ repoPath repo dir' + fromPath $ repoPath repo dir' {- Git remotes can have a directory that is specified relative - to the user's home directory, or that contains tilde expansions.