summaryrefslogtreecommitdiff
path: root/CmdLine.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-11-15 18:04:19 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-11-15 18:04:19 -0400
commit748a7475bb99e1127dc12bb2cc9d5653e4648200 (patch)
tree1f8a191a561715b4ff22949e420b452380ab1f6e /CmdLine.hs
parent9dc43d25995b085745c16cc31ad11106a74a9973 (diff)
dropunused
Diffstat (limited to 'CmdLine.hs')
-rw-r--r--CmdLine.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/CmdLine.hs b/CmdLine.hs
index cc163fff5..35e889d7d 100644
--- a/CmdLine.hs
+++ b/CmdLine.hs
@@ -26,6 +26,7 @@ import qualified Command.Fix
import qualified Command.Init
import qualified Command.Fsck
import qualified Command.Unused
+import qualified Command.DropUnused
import qualified Command.Unlock
import qualified Command.Lock
import qualified Command.PreCommit
@@ -65,6 +66,8 @@ subCmds =
"check for problems"
, SubCommand "unused" nothing Command.Unused.seek
"look for unused file content"
+ , SubCommand "dropunused" number Command.DropUnused.seek
+ "drop unused file content"
, SubCommand "find" maybepath Command.Find.seek
"lists available files"
]
@@ -73,6 +76,7 @@ subCmds =
maybepath = "[PATH ...]"
key = "KEY ..."
desc = "DESCRIPTION"
+ number = "NUMBER ..."
nothing = ""
-- Each dashed command-line option results in generation of an action