missed adding allowConcurrentOutput here

diff --git a/Command/Copy.hs b/Command/Copy.hs
index 1711b0c633065d74e885b9f06889580d85555477..1fe31e36e06019a58bc87a943f8af91551b78b3b 100644 (file)
--- a/Command/Copy.hs
+++ b/Command/Copy.hs
@@ -36,10 +36,11 @@ instance DeferredParseClass CopyOptions where
                <*> pure (autoMode v)
 
 seek :: CopyOptions -> CommandSeek
-seek o = withKeyOptions (Command.Move.keyOptions $ moveOptions o) (autoMode o)
-       (Command.Move.startKey (moveOptions o) False)
-       (withFilesInGit $ whenAnnexed $ start o)
-       (Command.Move.moveFiles $ moveOptions o)
+seek o = allowConcurrentOutput $
+       withKeyOptions (Command.Move.keyOptions $ moveOptions o) (autoMode o)
+               (Command.Move.startKey (moveOptions o) False)
+               (withFilesInGit $ whenAnnexed $ start o)
+               (Command.Move.moveFiles $ moveOptions o)
 
 {- A copy is just a move that does not delete the source file.
  - However, auto mode avoids unnecessary copies, and avoids getting or