summaryrefslogtreecommitdiff
path: root/Command/Add.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-01-28 14:04:32 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-01-28 14:04:32 -0400
commit0539e31a498539a7b7ca7f21764f595113ea9b1f (patch)
tree760b8a36d49bafe1ef32db50927b23c05dfc30e2 /Command/Add.hs
parent2b99d8217908d5553548d3c6a07978e2fad1e5ad (diff)
annex.addsmallfiles: New option controlling what is done when adding files not matching annex.largefiles.
Diffstat (limited to 'Command/Add.hs')
-rw-r--r--Command/Add.hs5
1 files changed, 4 insertions, 1 deletions
diff --git a/Command/Add.hs b/Command/Add.hs
index 23c9318fd..7a1150d10 100644
--- a/Command/Add.hs
+++ b/Command/Add.hs
@@ -49,7 +49,10 @@ seek o = allowConcurrentOutput $ do
matcher <- largeFilesMatcher
let gofile file = ifM (checkFileMatcher matcher file <||> Annex.getState Annex.force)
( start file
- , startSmall file
+ , ifM (annexAddSmallFiles <$> Annex.getGitConfig)
+ ( startSmall file
+ , stop
+ )
)
case batchOption o of
Batch -> batchFiles gofile