diff options
author | Joey Hess <joey@kitenet.net> | 2013-12-27 13:22:06 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-12-27 13:22:06 -0400 |
commit | aecd7635333cad4bf52649171f629b5172fb8281 (patch) | |
tree | 167c5c4d853363a4f79fe6646372f75ae47e8cd3 /Remote | |
parent | e8bc33fe29ca39d230eb4a9fb36ce6d17dbfef24 (diff) |
flush handle after writing message
Diffstat (limited to 'Remote')
-rw-r--r-- | Remote/External.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Remote/External.hs b/Remote/External.hs index 250719641..3dad99022 100644 --- a/Remote/External.hs +++ b/Remote/External.hs @@ -222,6 +222,7 @@ sendMessage lck external m = liftIO $ do protocolDebug external True line hPutStrLn h line + hFlush h where line = unwords $ formatMessage m |