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

support --hide-missing adjustment of view branches

Browse source 
I had thought this would not make sense to combine with view branches,
since removing files from a view changes metadata.

However, that's committing removal of files. With --hide-missing, the
files get removed when git-annex updates the branch itself, so there is
no conflict.

It does not seem likely to be very useful, but it does work! And that's
nice because it means all types of adjusted branches can be combined with
view branches.

Sponsored-by: Max Thoursie on Patreon
This commit is contained in:
Joey Hess 2023-02-27 15:39:58 -04:00
parent 1c4f4b449a
commit bb54c8a633
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
2 changed files with 5 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Annex/View.hs
View file

@ -516,10 +516,12 @@ applyView'' mkviewedfile getfilemetadata view madj l clean conv = do
( stagepointerfile uh f k mtreeitemtype
, stagesymlink uh f k
)
Just (PresenceAdjustment HideMissingAdjustment (Just UnlockAdjustment)) ->
whenM (inAnnex k) $
stagepointerfile uh f k mtreeitemtype
Just (PresenceAdjustment HideMissingAdjustment _) ->
whenM (inAnnex k)
( stagesymlink uh f k
)
whenM (inAnnex k) $
stagesymlink uh f k
_ -> stagesymlink uh f k
stagesymlink uh f k = do