summaryrefslogtreecommitdiff
path: root/Command/Info.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-04-09 12:28:26 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-04-09 12:28:26 -0400
commitb53c9e16064db874fa39b128e79810aaea63b4f6 (patch)
treea02ef52bb66a77d3aad936b071b94a9ce780a48a /Command/Info.hs
parent380ca13a2b63a4499a6defbdea731d1e547fc702 (diff)
info: Display repository mode: bare when in a bare (non-direct mode) repo.
Diffstat (limited to 'Command/Info.hs')
-rw-r--r--Command/Info.hs7
1 files changed, 6 insertions, 1 deletions
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