perhaps this fixes the stall tbd

This commit is contained in:
Joey Hess 2013-05-21 21:40:37 -04:00
parent a600471a23
commit 6e04194e84

View file

@ -167,6 +167,7 @@ xmppPush cid gitpush = runPush SendPack cid $ do
liftIO $ do
hPrint controlh (ExitFailure 1)
hFlush controlh
killThread =<< myThreadId
installwrapper tmpdir = liftIO $ do
createDirectoryIfMissing True tmpdir