summaryrefslogtreecommitdiff
path: root/Command
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-02-16 16:48:19 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-02-16 17:05:42 -0400
commit78c590b161bd7c800a4dd3a9d02f5e25d917998a (patch)
tree0f72e487481bd7a2173e63ba18799c323f206c49 /Command
parente25ea03e118a76ef59169ec6fb5b195c80ff00f7 (diff)
commit new transaction after 60 seconds
Database.Handle can now be given a CommitPolicy, making it easy to specify transaction granularity. Benchmarking the old git-annex incremental fsck that flips sticky bits to the new that uses sqlite, running in a repo with 37000 annexed files, both from cold cache: old: 6m6.906s new: 6m26.913s This commit was sponsored by TasLUG.
Diffstat (limited to 'Command')
-rw-r--r--Command/Fsck.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs
index 59d07caf4..9dba21dbf 100644
--- a/Command/Fsck.hs
+++ b/Command/Fsck.hs
@@ -443,9 +443,7 @@ withFsckDb (StartIncremental h) a = a h
withFsckDb NonIncremental _ = noop
recordFsckTime :: Incremental -> Key -> Annex ()
-recordFsckTime inc key = withFsckDb inc $ \h -> liftIO $ do
- FsckDb.addDb h key
- FsckDb.commitDb h
+recordFsckTime inc key = withFsckDb inc $ \h -> liftIO $ FsckDb.addDb h key
{- Records the start time of an incremental fsck.
-