diff options
Diffstat (limited to 'Assistant/Threads/MountWatcher.hs')
| -rw-r--r-- | Assistant/Threads/MountWatcher.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Assistant/Threads/MountWatcher.hs b/Assistant/Threads/MountWatcher.hs index f32e04314..bfdfe0ebb 100644 --- a/Assistant/Threads/MountWatcher.hs +++ b/Assistant/Threads/MountWatcher.hs @@ -159,8 +159,9 @@ handleMount st dstatus mntent = do rs <- remotesUnder st dstatus mntent unless (null rs) $ do branch <- runThreadState st $ Command.Sync.currentBranch - debug thisThread ["pulling from", show rs] - runThreadState st $ manualPull branch rs + let pullrs = filter Git.repoIsLocal rs + debug thisThread ["pulling from", show pullrs] + runThreadState st $ manualPull branch pullrs -- TODO queue transfers for new files in both directions where |