let updatetmpindex = do
r' <- liftIO $ Git.Env.addGitEnv r Git.Index.indexEnv
=<< Git.Index.indexEnvVal (toRawFilePath tmpindex)
- -- Avoid git warning about CRLF munging.
let r'' = r' { gitGlobalOpts = gitGlobalOpts r' ++
+ -- Avoid git warning about CRLF munging.
[ Param "-c"
, Param $ "core.safecrlf=" ++ boolConfig False
+ -- Avoid using git-annex
+ -- filter-process, because git
+ -- pipes the content of annexed
+ -- files into it; using
+ -- git-annex smudge --clean is
+ -- probably faster.
+ , Param "-c"
+ , Param $ "filter.annex.process="
] }
runsGitAnnexChildProcessViaGit' r'' $ \r''' ->
liftIO $ Git.UpdateIndex.refreshIndex r''' $ \feed ->