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

remove debug prints

Browse source
This commit is contained in:
Joey Hess 2013-02-19 23:18:15 -04:00
parent e1dba0c3dc
commit 2a4dad8bd4
1 changed files with 0 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Assistant/Threads/Committer.hs
View file

@ -247,9 +247,7 @@ safeToAdd delayadd pending inprocess = do
let inprocess' = inprocess ++ catMaybes (map mkinprocess $ zip pending keysources) let inprocess' = inprocess ++ catMaybes (map mkinprocess $ zip pending keysources)
openfiles <- S.fromList . map fst3 . filter openwrite <$> openfiles <- S.fromList . map fst3 . filter openwrite <$>
findopenfiles (map keySource inprocess') findopenfiles (map keySource inprocess')
liftIO $ print openfiles
let checked = map (check openfiles) inprocess' let checked = map (check openfiles) inprocess'
liftIO $ print checked
{- If new events are received when files are closed, {- If new events are received when files are closed,
- there's no need to retry any changes that cannot - there's no need to retry any changes that cannot