From aa05859410b43da72c3165b7915d8c917bc015ca Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 31 Oct 2010 15:38:47 -0400 Subject: more Wall cleaning --- Core.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Core.hs') diff --git a/Core.hs b/Core.hs index 5f799161c..c5026c6a5 100644 --- a/Core.hs +++ b/Core.hs @@ -74,7 +74,7 @@ gitAttributes repo = do {- set up a git pre-commit hook, if one is not already present -} gitPreCommitHook :: Git.Repo -> IO () gitPreCommitHook repo = do - let hook = (Git.workTree repo) ++ "/" ++ (Git.dir repo) ++ + let hook = (Git.workTree repo) ++ "/" ++ (Git.gitDir repo) ++ "/hooks/pre-commit" exists <- doesFileExist hook if (exists) -- cgit v1.2.3