summaryrefslogtreecommitdiff
path: root/Command/Unused.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-10-27 18:56:54 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-10-27 18:56:54 -0400
commitb955238ec7464b12c793d543fc51308c8b213e08 (patch)
treea8953c64f6933fe233993b29f2a64cf45a850e48 /Command/Unused.hs
parentc879eb873ec2fda1ec7d76c0de27d9ace57ba6e7 (diff)
Fail if --from or --to is passed to commands that do not support them.
Diffstat (limited to 'Command/Unused.hs')
-rw-r--r--Command/Unused.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Unused.hs b/Command/Unused.hs
index 5cef829d6..d2b45ed6b 100644
--- a/Command/Unused.hs
+++ b/Command/Unused.hs
@@ -28,7 +28,7 @@ import qualified Annex.Branch
import Annex.CatFile
command :: [Command]
-command = [Command "unused" paramNothing needsRepo seek
+command = [Command "unused" paramNothing (noTo >> needsRepo) seek
"look for unused file content"]
seek :: [CommandSeek]