WIP on making --quiet silence progress, and infra for concurrent progress bars
This commit is contained in:
parent
c2c901a6e4
commit
20fb91a7ad
14 changed files with 194 additions and 93 deletions
|
@ -81,7 +81,7 @@ splitWord = separate isSpace
|
|||
- and duplicate stderr to stdout. Return two new handles
|
||||
- that are duplicates of the original (stdin, stdout). -}
|
||||
dupIoHandles :: IO (Handle, Handle)
|
||||
duoIoHandles = do
|
||||
dupIoHandles = do
|
||||
readh <- hDuplicate stdin
|
||||
writeh <- hDuplicate stdout
|
||||
nullh <- openFile devNull ReadMode
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue