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

fixup

Browse source
This commit is contained in:
Joey Hess 2011-05-15 01:33:25 -04:00
parent 89ee0c373b
commit b400984ddf
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
test.hs
View file

@ -466,7 +466,7 @@ test_unused = "git-annex unused/dropunused" ~: intmpclonerepo $ do
where where
checkunused expectedkeys = do checkunused expectedkeys = do
git_annex "unused" ["-q"] @? "unused failed" git_annex "unused" ["-q"] @? "unused failed"
unusedmap <- annexeval $ Command.DropUnused.readUnusedLog unusedmap <- annexeval $ Command.DropUnused.readUnusedLog ""
let unusedkeys = M.elems unusedmap let unusedkeys = M.elems unusedmap
assertEqual "unused keys differ" assertEqual "unused keys differ"
(sort expectedkeys) (sort unusedkeys) (sort expectedkeys) (sort unusedkeys)