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

minor syntax changes

Browse source
This commit is contained in:
Joey Hess 2011-10-11 14:43:45 -04:00
parent 025ded4a2d
commit b505ba83e8
19 changed files with 78 additions and 95 deletions
Download patch file Download diff file Expand all files Collapse all files

4
test.hs
View file

@ -609,9 +609,7 @@ checkdangling f = do
checklocationlog :: FilePath -> Bool -> Assertion
checklocationlog f expected = do
thisuuid <- annexeval $ do
g <- Annex.gitRepo
UUID.getUUID g
thisuuid <- annexeval UUID.getUUID
r <- annexeval $ Backend.lookupFile f
case r of
Just (k, _) -> do