summaryrefslogtreecommitdiff
path: root/Command/Move.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Move.hs')
-rw-r--r--Command/Move.hs9
1 files changed, 5 insertions, 4 deletions
diff --git a/Command/Move.hs b/Command/Move.hs
index 9a289d8b6..7a0b57c10 100644
--- a/Command/Move.hs
+++ b/Command/Move.hs
@@ -45,10 +45,11 @@ instance DeferredParseClass MoveOptions where
<*> pure (keyOptions v)
seek :: MoveOptions -> CommandSeek
-seek o = withKeyOptions (keyOptions o) False
- (startKey o True)
- (withFilesInGit $ whenAnnexed $ start o True)
- (moveFiles o)
+seek o = allowConcurrentOutput $
+ withKeyOptions (keyOptions o) False
+ (startKey o True)
+ (withFilesInGit $ whenAnnexed $ start o True)
+ (moveFiles o)
start :: MoveOptions -> Bool -> FilePath -> Key -> CommandStart
start o move = start' o move . Just