assistant: Avoid syncing with annex-ignored remotes when reconnecting to the network, or connecting a drive.
This commit is contained in:
parent
69cc00c5fc
commit
746ffa773a
3 changed files with 4 additions and 2 deletions
|
@ -157,7 +157,7 @@ handleMount :: FilePath -> Assistant ()
|
|||
handleMount dir = do
|
||||
debug ["detected mount of", dir]
|
||||
rs <- filter (Git.repoIsLocal . Remote.repo) <$> remotesUnder dir
|
||||
reconnectRemotes True rs
|
||||
reconnectRemotes True $ filter (not . remoteAnnexIgnore . Remote.gitconfig) rs
|
||||
|
||||
{- Finds remotes located underneath the mount point.
|
||||
-
|
||||
|
|
|
@ -128,4 +128,4 @@ handleConnection = reconnectRemotes True =<< networkRemotes
|
|||
{- Finds network remotes. -}
|
||||
networkRemotes :: Assistant [Remote]
|
||||
networkRemotes = liftAnnex $
|
||||
filter (isNothing . Remote.localpath) <$> remoteList
|
||||
filter (isNothing . Remote.localpath) <$> enabledRemoteList
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue