mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

webapp: Avoid confusing display of dead remotes.

Browse source
This commit is contained in:
Joey Hess 2016-05-12 16:12:16 -04:00
parent a261a05c15
commit dd260706af
Failed to extract signature
3 changed files with 28 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Assistant/WebApp/RepoList.hs
View file

@ -138,7 +138,10 @@ repoList reposelector
liftAnnex $ do
unwanted <- S.fromList
<$> filterM inUnwantedGroup (map Remote.uuid syncremotes)
rs <- filter selectedrepo . concat . Remote.byCost
trustmap <- trustMap
rs <- filter (\r -> M.lookup (Remote.uuid r) trustmap /= Just DeadTrusted)
. filter selectedrepo
. concat . Remote.byCost
<$> Remote.remoteList
let l = flip map (map mkRepoId rs) $ \r -> case r of
(RepoUUID u)