summaryrefslogtreecommitdiff
path: root/Command/Fsck.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-12-30 15:06:26 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-12-30 15:06:26 -0400
commita89a6f21145966e625b811741d8ae972a11d92b1 (patch)
tree4fa1a5828b9b787ac25ae057b402e74ac36979d1 /Command/Fsck.hs
parent6a5be9d53cad9ee2988c6d54001f387dfe1f2716 (diff)
refactor in preparation for adding a git-annex-shell command
Diffstat (limited to 'Command/Fsck.hs')
-rw-r--r--Command/Fsck.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs
index 034bdc388..d870bd419 100644
--- a/Command/Fsck.hs
+++ b/Command/Fsck.hs
@@ -13,6 +13,10 @@ import Types
import Messages
import Utility
+command :: [Command]
+command = [Command "fsck" (paramOptional $ paramRepeating paramPath) seek
+ "check for problems"]
+
seek :: [CommandSeek]
seek = [withAll (withAttrFilesInGit "annex.numcopies") start]