mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

add additional debug info about reasons for transfers

Browse source
This commit is contained in:
Joey Hess 2013-03-01 15:23:59 -04:00
parent e2f1f7afc6
commit 46c9cbeb1e
9 changed files with 43 additions and 31 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Assistant/Threads/Watcher.hs
View file

@ -252,8 +252,8 @@ onAddSymlink file filestatus = go =<< liftAnnex (Backend.lookupFile file)
| scanComplete daemonstatus = do
present <- liftAnnex $ inAnnex key
if present
then queueTransfers Next key (Just file) Upload
else queueTransfers Next key (Just file) Download
then queueTransfers "new file created" Next key (Just file) Upload
else queueTransfers "new or renamed file wanted" Next key (Just file) Download
handleDrops present key (Just file) Nothing
| otherwise = noop