init: Fix bug when direct mode needs to be enabled on a crippled filesystem, that left the repository in indirect mode.

This commit is contained in:
Joey Hess 2019-02-15 12:34:03 -04:00
parent 27800ae165
commit c7893bf9b7
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
2 changed files with 3 additions and 0 deletions

View file

@ -294,3 +294,4 @@ enableDirectMode = unlessM isDirect $ do
forM_ l $ \f ->
maybe noop (`toDirect` f) =<< isAnnexLink f
void $ liftIO clean
setDirect True