summaryrefslogtreecommitdiff
path: root/Command/Status.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-11-18 13:22:48 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-11-18 13:22:48 -0400
commitc50a5fbeb4f90041f16cc84bf6b39577655d42b6 (patch)
treebf8e72086c6dc5ba947c76a6eb178ba38475bd7f /Command/Status.hs
parent1326bb863516b5e7efbfd9fba2754a3fe7289315 (diff)
status: Include all special remotes in the list of repositories.
Special remotes do not always have a description listed in uuid.log, and such ones were not listed before.
Diffstat (limited to 'Command/Status.hs')
-rw-r--r--Command/Status.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Status.hs b/Command/Status.hs
index 47b500b90..7448615cd 100644
--- a/Command/Status.hs
+++ b/Command/Status.hs
@@ -102,7 +102,7 @@ supported_remote_types = stat "supported remote types" $
remote_list :: TrustLevel -> String -> Stat
remote_list level desc = stat n $ lift $ do
- us <- uuidList
+ us <- M.keys <$> (M.union <$> uuidMap <*> remoteMap)
rs <- fst <$> trustPartition level us
s <- prettyPrintUUIDs n rs
return $ if null s then "0" else show (length rs) ++ "\n" ++ init s