aboutsummaryrefslogtreecommitdiff
path: root/Command/ExamineKey.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-01-18 11:54:43 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-01-18 11:54:43 -0400
commit8b7b01c1b38635b309f4e90c8369c3258766f181 (patch)
tree7fc7a46aa3a3d315063fdb6f6a49282b175ac6fe /Command/ExamineKey.hs
parenta0c7d37d1e0ac10b7304e48ff78d0cfb0308d9e5 (diff)
Remove --json option from commands not supporting it.
Diffstat (limited to 'Command/ExamineKey.hs')
-rw-r--r--Command/ExamineKey.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Command/ExamineKey.hs b/Command/ExamineKey.hs
index 7dfdadd3d..1e8e2cecf 100644
--- a/Command/ExamineKey.hs
+++ b/Command/ExamineKey.hs
@@ -12,9 +12,10 @@ import Command
import qualified Utility.Format
import Command.Find (formatOption, withFormat, showFormatted, keyVars)
import Types.Key
+import GitAnnex.Options
def :: [Command]
-def = [noCommit $ noMessages $ withOptions [formatOption] $
+def = [noCommit $ noMessages $ withOptions [formatOption, jsonOption] $
command "examinekey" (paramRepeating paramKey) seek
SectionPlumbing "prints information from a key"]