diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-10-29 11:40:22 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-10-29 11:40:22 -0400 |
| commit | f901112e1ce30f43dc7294e0bd0616bb02556500 (patch) | |
| tree | 92ab6d6f220ea21e0cc7feeff6caca52d4d2b677 /Assistant/Threads/Watcher.hs | |
| parent | 710dfa7e3ec897d6f02930540b10bb303e3a9c91 (diff) | |
converted 6 more threads
Diffstat (limited to 'Assistant/Threads/Watcher.hs')
| -rw-r--r-- | Assistant/Threads/Watcher.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Assistant/Threads/Watcher.hs b/Assistant/Threads/Watcher.hs index 33d4196da..7287c8c12 100644 --- a/Assistant/Threads/Watcher.hs +++ b/Assistant/Threads/Watcher.hs @@ -159,10 +159,10 @@ onAddSymlink file filestatus = go =<< liftAnnex (Backend.lookupFile file) ensurestaged link daemonstatus | scanComplete daemonstatus = addlink link | otherwise = case filestatus of - Just s | changedrecently s -> liftIO noChange + Just s | not (changedrecently s) -> liftIO noChange _ -> addlink link where - changedrecently s = not $ + changedrecently s = afterLastDaemonRun (statusChangeTime s) daemonstatus {- For speed, tries to reuse the existing blob for symlink target. -} |