sync, assistant: Sync with remotes that have annex-ignore set
This is so git remotes on servers without git-annex installed can be used to keep clients' git repos in sync. This is a behavior change, but since annex-sync can be set to disable syncing with a remote, I think it's acceptable.
This commit is contained in:
parent
b9341fd4c0
commit
8861e270be
10 changed files with 22 additions and 17 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 $ filter (not . remoteAnnexIgnore . Remote.gitconfig) rs
|
||||
reconnectRemotes True 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) <$> enabledRemoteList
|
||||
filter (isNothing . Remote.localpath) <$> remoteList
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue