diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2016-10-17 14:58:33 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-10-17 14:58:33 -0400 |
| commit | 697bb401dbb2a9497e8e3cbc895052ad87a75c23 (patch) | |
| tree | 75ce98791b4863dea985fa3c16b19d9cc5dfcab5 /Upgrade | |
| parent | 124a153411a440c6996315ca0189556aabbae78b (diff) | |
refactor
Diffstat (limited to 'Upgrade')
| -rw-r--r-- | Upgrade/V5.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Upgrade/V5.hs b/Upgrade/V5.hs index e5ca505ac..a05f2e051 100644 --- a/Upgrade/V5.hs +++ b/Upgrade/V5.hs @@ -15,6 +15,7 @@ import Annex.Link import Annex.Direct import Annex.Content import Annex.CatFile +import Annex.WorkTree import qualified Database.Keys import qualified Annex.Content.Direct as Direct import qualified Git @@ -31,7 +32,7 @@ upgrade :: Bool -> Annex Bool upgrade automatic = do unless automatic $ showAction "v5 to v6" - Database.Keys.scanAssociatedFiles + scanUnlockedFiles whenM isDirect $ do {- Direct mode makes the same tradeoff of using less disk - space, with less preservation of old versions of files |