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

use --force in taggedPush

Browse source 
This should make the assistant force update its tagged push branch
after a transition like git annex forget.
This commit is contained in:
Joey Hess 2013-08-29 13:31:29 -04:00
parent 336d5ec349
commit c181efe437
1 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Annex/TaggedPush.hs
View file

@ -49,6 +49,10 @@ fromTaggedBranch b = case split "/" $ show b of
taggedPush :: UUID -> Maybe String -> Git.Ref -> Remote -> Git.Repo -> IO Bool taggedPush :: UUID -> Maybe String -> Git.Ref -> Remote -> Git.Repo -> IO Bool
taggedPush u info branch remote = Git.Command.runBool taggedPush u info branch remote = Git.Command.runBool
[ Param "push" [ Param "push"
-- This is safe because we "own" the tagged branch we're pushing;
-- it has no other writers. Ensures it is pushed even if it has
-- been rewritten by a transition.
, Param "--force"
, Param $ Remote.name remote , Param $ Remote.name remote
, Param $ refspec Annex.Branch.name , Param $ refspec Annex.Branch.name
, Param $ refspec branch , Param $ refspec branch