summaryrefslogtreecommitdiff
path: root/Command/DropUnused.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-10-27 16:31:35 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-10-27 16:31:35 -0400
commit5b74b130a39d8c45e7d24520d838d6c1635582c7 (patch)
tree3d2816f028e7135a168d64c6342e1a2588260417 /Command/DropUnused.hs
parent66194684acaf8dc5c72e5a163465b42050cf9212 (diff)
refactored and generalized pre-command sanity checking
Diffstat (limited to 'Command/DropUnused.hs')
-rw-r--r--Command/DropUnused.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/DropUnused.hs b/Command/DropUnused.hs
index 005068556..019fab076 100644
--- a/Command/DropUnused.hs
+++ b/Command/DropUnused.hs
@@ -21,7 +21,7 @@ import Types.Key
type UnusedMap = M.Map String Key
command :: [Command]
-command = [repoCommand "dropunused" (paramRepeating paramNumber) seek
+command = [Command "dropunused" (paramRepeating paramNumber) needsRepo seek
"drop unused file content"]
seek :: [CommandSeek]