join back threads before ending concurrent output so display works
I didn't really want to put allowConcurrentOutput in CmdLine.Action, but there were dep loops and that was the best place available.
This commit is contained in:
parent
2ca52b4a9d
commit
ab6b1edfee
4 changed files with 123 additions and 92 deletions
|
@ -19,7 +19,6 @@ module Command (
|
|||
whenAnnexed,
|
||||
ifAnnexed,
|
||||
isBareRepo,
|
||||
allowConcurrentOutput,
|
||||
module ReExported
|
||||
) where
|
||||
|
||||
|
@ -37,7 +36,6 @@ import CmdLine.Option as ReExported
|
|||
import CmdLine.GlobalSetter as ReExported
|
||||
import CmdLine.GitAnnex.Options as ReExported
|
||||
import Options.Applicative as ReExported hiding (command)
|
||||
import Messages.Internal (allowConcurrentOutput)
|
||||
|
||||
import qualified Options.Applicative as O
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue