skip sending individual files to export remotes
That will fail, and it already exports whole trees.
f6dd34ca81
made it sync content with
import remotes, and if an import remote is also an export remote, that
caused this new failure mode.
Sponsored-by: Brock Spratlen on Patreon
This commit is contained in:
parent
4a42e7d11e
commit
1f09b709fc
1 changed files with 4 additions and 3 deletions
|
@ -296,9 +296,9 @@ seek' o = do
|
||||||
(filter isExport contentremotes)
|
(filter isExport contentremotes)
|
||||||
|
|
||||||
-- Sync content with remotes, including
|
-- Sync content with remotes, including
|
||||||
-- with import remotes (since importing
|
-- importing from import remotes (since
|
||||||
-- only downloads new files not old files),
|
-- importing only downloads new files not
|
||||||
-- but not with export only remotes.
|
-- old files)
|
||||||
let shouldsynccontent r
|
let shouldsynccontent r
|
||||||
| isExport r && not (isImport r) = False
|
| isExport r && not (isImport r) = False
|
||||||
| otherwise = True
|
| otherwise = True
|
||||||
|
@ -926,6 +926,7 @@ syncFile o ebloom rs af k = do
|
||||||
wantput r
|
wantput r
|
||||||
| pushOption o == False = return False
|
| pushOption o == False = return False
|
||||||
| Remote.readonly r || remoteAnnexReadOnly (Remote.gitconfig r) = return False
|
| Remote.readonly r || remoteAnnexReadOnly (Remote.gitconfig r) = return False
|
||||||
|
| isExport r = return False
|
||||||
| isThirdPartyPopulated r = return False
|
| isThirdPartyPopulated r = return False
|
||||||
| otherwise = wantGetBy True (Just k) af (Remote.uuid r)
|
| otherwise = wantGetBy True (Just k) af (Remote.uuid r)
|
||||||
handleput lack inhere
|
handleput lack inhere
|
||||||
|
|
Loading…
Add table
Reference in a new issue