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

avoid autoenable of dead special remotes

Browse source
This commit is contained in:
Joey Hess 2015-09-14 15:28:14 -04:00
parent b1fbb08dc5
commit c919489c3e
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Annex/SpecialRemote.hs
View file

@ -73,7 +73,7 @@ autoEnable = do
remotemap <- M.filter wanted <$> readRemoteLog remotemap <- M.filter wanted <$> readRemoteLog
forM_ (M.toList remotemap) $ \(u, c) -> forM_ (M.toList remotemap) $ \(u, c) ->
case (M.lookup nameKey c, findType c) of case (M.lookup nameKey c, findType c) of
(Just name, Right t) -> do (Just name, Right t) -> unlessM ((== DeadTrusted) <$> lookupTrust u) $ do
showSideAction $ "Auto enabling special remote " ++ name showSideAction $ "Auto enabling special remote " ++ name
res <- tryNonAsync $ setup t (Just u) Nothing c res <- tryNonAsync $ setup t (Just u) Nothing c
case res of case res of