From 8011bedf1699147b34cc1504218a7c3bc14f1c47 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Mon, 29 Oct 2012 11:58:29 -0400
Subject: tweak

---
 Assistant/Threads/Watcher.hs | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'Assistant/Threads/Watcher.hs')

diff --git a/Assistant/Threads/Watcher.hs b/Assistant/Threads/Watcher.hs
index 7287c8c12..172b7976e 100644
--- a/Assistant/Threads/Watcher.hs
+++ b/Assistant/Threads/Watcher.hs
@@ -159,11 +159,9 @@ onAddSymlink file filestatus = go =<< liftAnnex (Backend.lookupFile file)
 	ensurestaged link daemonstatus
 		| scanComplete daemonstatus = addlink link
 		| otherwise = case filestatus of
-			Just s | not (changedrecently s) -> liftIO noChange
+			Just s
+				| not (afterLastDaemonRun (statusChangeTime s) daemonstatus) -> liftIO noChange
 			_ -> addlink link
-	  where
-		changedrecently s = 
-			afterLastDaemonRun (statusChangeTime s) daemonstatus
 
 	{- For speed, tries to reuse the existing blob for symlink target. -}
 	addlink link = do
-- 
cgit v1.2.3