summaryrefslogtreecommitdiff
path: root/Command/ExamineKey.hs
diff options
context:
space:
mode:
authorJoey Hess <joey@kitenet.net>2014-01-18 11:54:43 -0400
committerJoey Hess <joey@kitenet.net>2014-01-18 11:54:43 -0400
commit1d90e72e91e01cf88a6e8a39ed61746aa68f8fee (patch)
tree44290cc39d2664fbe7b04504d2c35df17d637e9d /Command/ExamineKey.hs
parentdce9faf6e4e83ac07c3debb7afa99fea6488d762 (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 7dfdadd3df..1e8e2cecf1 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"]