summaryrefslogtreecommitdiff
path: root/Checks.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Checks.hs')
-rw-r--r--Checks.hs3
1 files changed, 0 insertions, 3 deletions
diff --git a/Checks.hs b/Checks.hs
index cd172c609..6a70fc52d 100644
--- a/Checks.hs
+++ b/Checks.hs
@@ -31,9 +31,6 @@ toOpt = CommandCheck 2 $ do
v <- Annex.getState Annex.toremote
unless (v == Nothing) $ error "cannot use --to with this command"
-checkCommand :: Command -> Annex ()
-checkCommand Command { cmdcheck = c } = sequence_ $ map runCheck c
-
dontCheck :: CommandCheck -> Command -> Command
dontCheck check cmd = mutateCheck cmd $ \c -> filter (/= check) c