Remove --json option from commands not supporting it.

This commit is contained in:
Joey Hess 2014-01-18 11:54:43 -04:00
parent dce9faf6e4
commit 1d90e72e91
6 changed files with 19 additions and 6 deletions

View file

@ -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"]