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

filter out special remotes when pulling

Browse source
This commit is contained in:
Joey Hess 2012-07-22 15:09:40 -04:00
parent e4f714d1be
commit 26e4e65307
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Assistant/Threads/MountWatcher.hs
View file

@ -159,8 +159,9 @@ handleMount st dstatus mntent = do
rs <- remotesUnder st dstatus mntent rs <- remotesUnder st dstatus mntent
unless (null rs) $ do unless (null rs) $ do
branch <- runThreadState st $ Command.Sync.currentBranch branch <- runThreadState st $ Command.Sync.currentBranch
debug thisThread ["pulling from", show rs] let pullrs = filter Git.repoIsLocal rs
runThreadState st $ manualPull branch rs debug thisThread ["pulling from", show pullrs]
runThreadState st $ manualPull branch pullrs
-- TODO queue transfers for new files in both directions -- TODO queue transfers for new files in both directions
where where