summaryrefslogtreecommitdiff
path: root/Command/Drop.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-11-04 17:13:20 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-11-04 17:13:20 -0400
commit950a549dc1fb8dc4e64812dcbdc17a7ac0a4204f (patch)
tree3864cc91a386bd0e1736ed219ae7443d5f77fa99 /Command/Drop.hs
parentecb430460d417d3e48921964f8ee36c44c46415f (diff)
drop -Jn
Diffstat (limited to 'Command/Drop.hs')
-rw-r--r--Command/Drop.hs11
1 files changed, 6 insertions, 5 deletions
diff --git a/Command/Drop.hs b/Command/Drop.hs
index 5c5328618..b26a4842a 100644
--- a/Command/Drop.hs
+++ b/Command/Drop.hs
@@ -24,7 +24,7 @@ import System.Log.Logger (debugM)
import qualified Data.Set as S
cmd :: Command
-cmd = withGlobalOptions annexedMatchingOptions $
+cmd = withGlobalOptions (jobsOption : annexedMatchingOptions) $
command "drop" SectionCommon
"remove content of files from repository"
paramPaths (seek <$$> optParser)
@@ -51,10 +51,11 @@ parseDropFromOption = parseRemoteOption $ strOption
)
seek :: DropOptions -> CommandSeek
-seek o = withKeyOptions (keyOptions o) (autoMode o)
- (startKeys o)
- (withFilesInGit $ whenAnnexed $ start o)
- (dropFiles o)
+seek o = allowConcurrentOutput $
+ withKeyOptions (keyOptions o) (autoMode o)
+ (startKeys o)
+ (withFilesInGit $ whenAnnexed $ start o)
+ (dropFiles o)
start :: DropOptions -> FilePath -> Key -> CommandStart
start o file key = start' o key (Just file)