fix broken test
1c997fd08c
broke the mixed conflict
resolution test. Since origin is no longer involved, both sides have to
sync after pairing. (The sync before pairing is just to get a commit.)
This commit is contained in:
parent
c91bbc9494
commit
617c63a213
1 changed files with 6 additions and 6 deletions
12
Test.hs
12
Test.hs
|
@ -827,19 +827,19 @@ test_mixed_conflict_resolution env = do
|
|||
git_annex env "add" [conflictor] @? "add conflicter failed"
|
||||
git_annex env "sync" [] @? "sync failed in r2"
|
||||
pair env r1 r2
|
||||
let r = if inr1 then r1 else r2
|
||||
indir env r $ do
|
||||
let l = if inr1 then [r1, r2] else [r2, r1]
|
||||
forM_ l $ \r -> indir env r $
|
||||
git_annex env "sync" [] @? "sync failed in mixed conflict"
|
||||
checkmerge r1
|
||||
checkmerge r2
|
||||
checkmerge "r1" r1
|
||||
checkmerge "r1" r2
|
||||
where
|
||||
conflictor = "conflictor"
|
||||
variantprefix = conflictor ++ ".variant"
|
||||
checkmerge d = do
|
||||
checkmerge what d = do
|
||||
doesDirectoryExist (d </> conflictor) @? (d ++ " conflictor directory missing")
|
||||
l <- getDirectoryContents d
|
||||
any (variantprefix `isPrefixOf`) l
|
||||
@? (d ++ " conflictor file missing in: " ++ show l )
|
||||
@? (what ++ " conflictor file missing in: " ++ show l )
|
||||
|
||||
{- Set up repos as remotes of each other. -}
|
||||
pair :: TestEnv -> FilePath -> FilePath -> Assertion
|
||||
|
|
Loading…
Add table
Reference in a new issue