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:
Joey Hess 2015-11-05 17:22:45 -04:00
parent 2ca52b4a9d
commit ab6b1edfee
Failed to extract signature
4 changed files with 123 additions and 92 deletions

View file

@ -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