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.
This commit is contained in:
parent
1326bb8635
commit
c50a5fbeb4
5 changed files with 24 additions and 19 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue