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

flush handle after writing message

Browse source
This commit is contained in:
Joey Hess 2013-12-27 13:22:06 -04:00
parent fa6f404a5f
commit 21342cae63
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
Remote/External.hs
View file

@ -222,6 +222,7 @@ sendMessage lck external m =
liftIO $ do liftIO $ do
protocolDebug external True line protocolDebug external True line
hPutStrLn h line hPutStrLn h line
hFlush h
where where
line = unwords $ formatMessage m line = unwords $ formatMessage m