diff options
| author |  Joey Hess <joey@kitenet.net> | 2014-01-18 11:54:43 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-01-18 11:54:43 -0400 |
| commit | 8b7b01c1b38635b309f4e90c8369c3258766f181 (patch) | |
| tree | 7fc7a46aa3a3d315063fdb6f6a49282b175ac6fe /Command/Info.hs | |
| parent | a0c7d37d1e0ac10b7304e48ff78d0cfb0308d9e5 (diff) | |
Remove --json option from commands not supporting it.
Diffstat (limited to 'Command/Info.hs')
| -rw-r--r-- | Command/Info.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/Command/Info.hs b/Command/Info.hs index d465f2d84..7a9ec15dc 100644 --- a/Command/Info.hs +++ b/Command/Info.hs @@ -21,6 +21,7 @@ import qualified Remote import qualified Command.Unused import qualified Git import qualified Annex +import GitAnnex.Options import Command import Utility.DataUnits import Utility.DiskFree @@ -70,8 +71,9 @@ data StatInfo = StatInfo type StatState = StateT StatInfo Annex def :: [Command] -def = [noCommit $ command "info" paramPaths seek - SectionQuery "shows general information about the annex"] +def = [noCommit $ withOptions [jsonOption] $ + command "info" paramPaths seek SectionQuery + "shows general information about the annex"] seek :: [CommandSeek] seek = [withWords start] |