summaryrefslogtreecommitdiff
path: root/Utility/Path.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-02-09 15:24:33 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-02-09 15:37:26 -0400
commitd3aeb09c68cd0e58d5ffd29b09988b52daa42eff (patch)
tree40d25dd28a7ea364a3947c6fe41c3664e86f32b4 /Utility/Path.hs
parentc931516fb2de05e5b2bc2cb2d1548f9c6362c542 (diff)
Windows: Fix bug in dropping an annexed file, which caused a symlink to be staged that contained backslashes.
Diffstat (limited to 'Utility/Path.hs')
-rw-r--r--Utility/Path.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/Path.hs b/Utility/Path.hs
index 4ff88f72e..6ecec2c5f 100644
--- a/Utility/Path.hs
+++ b/Utility/Path.hs
@@ -66,7 +66,7 @@ absPathFrom :: FilePath -> FilePath -> FilePath
absPathFrom dir path = simplifyPath (combine dir path)
{- On Windows, this converts the paths to unix-style, in order to run
- - MissingH's absNormPath on them. Resulting path will use / separators. -}
+ - MissingH's absNormPath on them. -}
absNormPathUnix :: FilePath -> FilePath -> Maybe FilePath
#ifndef mingw32_HOST_OS
absNormPathUnix dir path = MissingH.absNormPath dir path