summaryrefslogtreecommitdiff
path: root/Command/PreCommit.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/PreCommit.hs')
-rw-r--r--Command/PreCommit.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/Command/PreCommit.hs b/Command/PreCommit.hs
index 4f1729394..2d62b51f3 100644
--- a/Command/PreCommit.hs
+++ b/Command/PreCommit.hs
@@ -29,9 +29,10 @@ import qualified Git.LsFiles as Git
import qualified Data.Set as S
cmd :: Command
-cmd = command "pre-commit" paramPaths SectionPlumbing
+cmd = command "pre-commit" SectionPlumbing
"run by git pre-commit hook"
- (commandParser seek)
+ paramPaths
+ (withParams seek)
seek :: CmdParams -> CommandSeek
seek ps = lockPreCommitHook $ ifM isDirect