diff options
Diffstat (limited to 'Annex/InodeSentinal.hs')
-rw-r--r-- | Annex/InodeSentinal.hs | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/Annex/InodeSentinal.hs b/Annex/InodeSentinal.hs index 7047a405c..450e3b967 100644 --- a/Annex/InodeSentinal.hs +++ b/Annex/InodeSentinal.hs @@ -14,6 +14,15 @@ import qualified Annex import Utility.InodeCache import Annex.Perms +{- If the inodes have changed, only the size and mtime are compared. -} +compareInodeCaches :: InodeCache -> InodeCache -> Annex Bool +compareInodeCaches x y + | compareStrong x y = return True + | otherwise = ifM inodesChanged + ( return $ compareWeak x y + , return False + ) + {- Some filesystems get new inodes each time they are mounted. - In order to work on such a filesystem, a sentinal file is used to detect - when the inodes have changed. |