WIP
for https://git-annex.branchable.com/bugs/Buggy_external_special_remote_stalls_after_7245a9e/
This commit is contained in:
parent
3dda21d292
commit
aafae46bcb
4 changed files with 88 additions and 38 deletions
|
@ -140,11 +140,11 @@ mkOutputHandlerQuiet = OutputHandler
|
|||
<$> pure True
|
||||
<*> mkStderrEmitter
|
||||
|
||||
mkStderrRelayer :: Annex (Handle -> IO ())
|
||||
mkStderrRelayer :: Annex (ProcessHandle -> Handle -> IO ())
|
||||
mkStderrRelayer = do
|
||||
quiet <- commandProgressDisabled
|
||||
emitter <- mkStderrEmitter
|
||||
return $ \h -> avoidProgress quiet h emitter
|
||||
return $ \ph h -> avoidProgress quiet ph h emitter
|
||||
|
||||
{- Generates an IO action that can be used to emit stderr.
|
||||
-
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue