flush stream after each write to update-index, to possibly avoid buffering issues on Windows

This commit is contained in:
Joey Hess 2013-06-14 14:25:17 -04:00
parent f341703057
commit b97a9ea786

View file

@ -44,6 +44,7 @@ streamUpdateIndex repo as = pipeWrite params repo $ \h -> do
streamer h s = do
hPutStr h s
hPutStr h "\0"
hFlush h
{- A streamer that adds the current tree for a ref. Useful for eg, copying
- and modifying branches. -}