From 52fea847cb70ebb34a177a96106659af83310dc3 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 14 May 2013 15:44:49 -0400 Subject: typo --- Git/Construct.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Git/Construct.hs') diff --git a/Git/Construct.hs b/Git/Construct.hs index 1cded7a13..b947abd89 100644 --- a/Git/Construct.hs +++ b/Git/Construct.hs @@ -71,7 +71,7 @@ fromAbsPath dir {- When dir == "foo/.git", git looks for "foo/.git/.git", - and failing that, uses "foo" as the repository. -} hunt - | pathSeparator:".git" `isSuffixOf` canondir = + | (pathSeparator:".git") `isSuffixOf` canondir = ifM (doesDirectoryExist $ dir ".git") ( ret dir , ret $ takeDirectory canondir -- cgit v1.2.3