From b53c9e16064db874fa39b128e79810aaea63b4f6 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 9 Apr 2015 12:28:26 -0400 Subject: info: Display repository mode: bare when in a bare (non-direct mode) repo. --- Command/Info.hs | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'Command') diff --git a/Command/Info.hs b/Command/Info.hs index e489db0ea..db5953050 100644 --- a/Command/Info.hs +++ b/Command/Info.hs @@ -238,7 +238,12 @@ showStat s = maybe noop calc =<< s repository_mode :: Stat repository_mode = simpleStat "repository mode" $ lift $ ifM isDirect - ( return "direct", return "indirect" ) + ( return "direct" + , ifM (fromRepo Git.repoIsLocalBare) + ( return "bare" + , return "indirect" + ) + ) remote_list :: TrustLevel -> Stat remote_list level = stat n $ nojson $ lift $ do -- cgit v1.2.3