summaryrefslogtreecommitdiff
path: root/Assistant/Threads/Merger.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-03-01 15:23:59 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-03-01 15:23:59 -0400
commit0fa9ecb7ba54aa719dec810033b5f54ca197bf4e (patch)
treeb1179d1852450e1c7d54a99c03de2c0f9fb629a2 /Assistant/Threads/Merger.hs
parentee19c8c802bec35fe0d3b92b7f065eed819ec38f (diff)
add additional debug info about reasons for transfers
Diffstat (limited to 'Assistant/Threads/Merger.hs')
-rw-r--r--Assistant/Threads/Merger.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Threads/Merger.hs b/Assistant/Threads/Merger.hs
index d8eea8c84..1488a2f0d 100644
--- a/Assistant/Threads/Merger.hs
+++ b/Assistant/Threads/Merger.hs
@@ -65,7 +65,7 @@ onAdd file
| isAnnexBranch file = do
branchChanged
whenM (liftAnnex Annex.Branch.forceUpdate) $
- queueDeferredDownloads Later
+ queueDeferredDownloads "retrying deferred download" Later
| "/synced/" `isInfixOf` file = do
mergecurrent =<< liftAnnex (inRepo Git.Branch.current)
| otherwise = noop