From c77267d2b874d9f0d338a2bbd5aac4791b540dcc Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Sat, 18 Jan 2014 13:05:56 -0400
Subject: whereis supports --json, add option

---
 Command/Whereis.hs | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'Command/Whereis.hs')

diff --git a/Command/Whereis.hs b/Command/Whereis.hs
index 7086bf645..fcbbbf0d5 100644
--- a/Command/Whereis.hs
+++ b/Command/Whereis.hs
@@ -13,10 +13,12 @@ import Common.Annex
 import Command
 import Remote
 import Logs.Trust
+import GitAnnex.Options
 
 def :: [Command]
-def = [noCommit $ command "whereis" paramPaths seek
-	SectionQuery "lists repositories that have file content"]
+def = [noCommit $ withOptions [jsonOption] $
+	command "whereis" paramPaths seek SectionQuery
+		"lists repositories that have file content"]
 
 seek :: [CommandSeek]
 seek = [withValue (remoteMap id) $ \m ->
-- 
cgit v1.2.3