merging sqlite and bs branches
Since the sqlite branch uses blobs extensively, there are some performance benefits, ByteStrings now get stored and retrieved w/o conversion in some cases like in Database.Export.
This commit is contained in:
commit
2f9a80d803
266 changed files with 2860 additions and 1325 deletions
|
@ -95,11 +95,11 @@ removeOldDb getdb = do
|
|||
populateKeysDb :: Annex ()
|
||||
populateKeysDb = do
|
||||
top <- fromRepo Git.repoPath
|
||||
(l, cleanup) <- inRepo $ LsFiles.inodeCaches [top]
|
||||
(l, cleanup) <- inRepo $ LsFiles.inodeCaches [toRawFilePath top]
|
||||
forM_ l $ \case
|
||||
(_f, Nothing) -> giveup "Unable to parse git ls-files --debug output while upgrading git-annex sqlite databases."
|
||||
(f, Just ic) -> unlessM (liftIO $ isSymbolicLink <$> getSymbolicLinkStatus f) $ do
|
||||
catKeyFile f >>= \case
|
||||
catKeyFile (toRawFilePath f) >>= \case
|
||||
Nothing -> noop
|
||||
Just k -> do
|
||||
topf <- inRepo $ toTopFilePath f
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue