aboutsummaryrefslogtreecommitdiff
path: root/Command.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-11-04 16:19:00 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-11-04 16:22:43 -0400
commit332e98b6cb1091c46221e2d8579a0035ba4dff51 (patch)
tree7c80c508ddf408951a6ffc0c419c84094736e781 /Command.hs
parent527b6970457e74f8c88dfdac7c96241e2496a2f2 (diff)
arrange for regional output manager to run when -J is enabled
Commands that want to use it have to run their seek action inside allowConcurrentOutput. Which seems reasonable; perhaps some future command will want to support the -J flag but not use regions. The region state moved from Annex to MessageState. This makes sense organizationally, and note that some uses of onLocal use a different Annex state, but pass the MessageState into it, which is what is needed.
Diffstat (limited to 'Command.hs')
-rw-r--r--Command.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/Command.hs b/Command.hs
index bee63bb74..17787539b 100644
--- a/Command.hs
+++ b/Command.hs
@@ -19,6 +19,7 @@ module Command (
whenAnnexed,
ifAnnexed,
isBareRepo,
+ allowConcurrentOutput,
module ReExported
) where
@@ -36,6 +37,7 @@ 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