pullOption should be pushOption in seekExportContent

sync: Fix bug that made --no-pull, rather than --no-push prevent exporting
trees to special remotes.

Sponsored-by: Joshua Antonishen on Patreon
This commit is contained in:
Joey Hess 2023-05-16 15:55:24 -04:00
parent 705b7e2d36
commit 212442dd9b
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
2 changed files with 3 additions and 1 deletions

View file

@ -49,6 +49,8 @@ git-annex (10.20230408) UNRELEASED; urgency=medium
* reinject: Fix support for operating on multiple pairs of files and keys.
* importfeed: Support -J
* importfeed: Support --json-progress
* sync: Fix bug that made --no-pull, rather than --no-push prevent
exporting trees to special remotes.
* uninit: Avoid buffering the names of all annexed files in memory.
-- Joey Hess <id@joeyh.name> Sat, 08 Apr 2023 13:57:18 -0400

View file

@ -912,7 +912,7 @@ seekExportContent :: Maybe SyncOptions -> [Remote] -> CurrBranch -> Annex Bool
seekExportContent o rs (currbranch, _) = or <$> forM rs go
where
go r
| not (maybe True pullOption o) = return False
| not (maybe True pushOption o) = return False
| not (remoteAnnexPush (Remote.gitconfig r)) = return False
| otherwise = bracket
(Export.openDb (Remote.uuid r))