From 76ccac53916d308aa4806d38bb8cfb6a9d1f9081 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 9 Dec 2015 17:00:37 -0400 Subject: add inode cache to the db Renamed the db to keys, since it is various info about a Keys. Dropping a key will update its pointer files, as long as their content can be verified to be unmodified. This falls back to checksum verification, but I want it to use an InodeCache of the key, for speed. But, I have not made anything populate that cache yet. --- Annex.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'Annex.hs') diff --git a/Annex.hs b/Annex.hs index 5c9ec4cd4..c4df0b92f 100644 --- a/Annex.hs +++ b/Annex.hs @@ -60,7 +60,7 @@ import Types.NumCopies import Types.LockCache import Types.DesktopNotify import Types.CleanupActions -import qualified Database.AssociatedFiles.Types +import qualified Database.Keys.Types #ifdef WITH_QUVI import Utility.Quvi (QuviVersion) #endif @@ -135,7 +135,7 @@ data AnnexState = AnnexState , desktopnotify :: DesktopNotify , workers :: [Either AnnexState (Async AnnexState)] , concurrentjobs :: Maybe Int - , associatedfilesdbhandle :: Maybe Database.AssociatedFiles.Types.DbHandle + , keysdbhandle :: Maybe Database.Keys.Types.DbHandle } newState :: GitConfig -> Git.Repo -> AnnexState @@ -181,7 +181,7 @@ newState c r = AnnexState , desktopnotify = mempty , workers = [] , concurrentjobs = Nothing - , associatedfilesdbhandle = Nothing + , keysdbhandle = Nothing } {- Makes an Annex state object for the specified git repo. -- cgit v1.2.3