use nukefile rather than shelling to rm

This commit is contained in:
Joey Hess 2014-02-10 18:29:15 -04:00
parent 66c9cb6e39
commit e8b9c96e4e
Failed to extract signature

View file

@ -230,7 +230,7 @@ test_add env = inmainrepo env $ do
( do ( do
writeFile ingitfile $ content ingitfile writeFile ingitfile $ content ingitfile
not <$> boolSystem "git" [Param "add", File ingitfile] @? "git add failed to fail in direct mode" not <$> boolSystem "git" [Param "add", File ingitfile] @? "git add failed to fail in direct mode"
boolSystem "rm" [Params "-f", File ingitfile] @? "rm failed" nukeFile ingitfile
git_annex env "sync" [] @? "sync failed" git_annex env "sync" [] @? "sync failed"
, do , do
writeFile ingitfile $ content ingitfile writeFile ingitfile $ content ingitfile