diff options
-rw-r--r-- | Git/Construct.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Git/Construct.hs b/Git/Construct.hs index 586fa8c03..35c77e9d2 100644 --- a/Git/Construct.hs +++ b/Git/Construct.hs @@ -91,7 +91,7 @@ fromUrl url fromUrlStrict :: String -> IO Repo fromUrlStrict url - | startswith "file://" url = fromAbsPath $ uriPath u + | startswith "file://" url = fromAbsPath $ unEscapeString $ uriPath u | otherwise = newFrom $ Url u where u = fromMaybe bad $ parseURI url |