diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-02-16 16:48:19 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-02-16 17:05:42 -0400 |
| commit | 78c590b161bd7c800a4dd3a9d02f5e25d917998a (patch) | |
| tree | 0f72e487481bd7a2173e63ba18799c323f206c49 /Command | |
| parent | e25ea03e118a76ef59169ec6fb5b195c80ff00f7 (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.hs | 4 |
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. - |