summaryrefslogtreecommitdiff
path: root/Annex/Init.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-10-17 14:58:33 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-10-17 14:58:33 -0400
commit697bb401dbb2a9497e8e3cbc895052ad87a75c23 (patch)
tree75ce98791b4863dea985fa3c16b19d9cc5dfcab5 /Annex/Init.hs
parent124a153411a440c6996315ca0189556aabbae78b (diff)
refactor
Diffstat (limited to 'Annex/Init.hs')
-rw-r--r--Annex/Init.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Annex/Init.hs b/Annex/Init.hs
index 9e0361daf..5aff4cf39 100644
--- a/Annex/Init.hs
+++ b/Annex/Init.hs
@@ -31,6 +31,7 @@ import Annex.Version
import Annex.Difference
import Annex.UUID
import Annex.Link
+import Annex.WorkTree
import Config
import Annex.Direct
import Annex.AdjustedBranch
@@ -39,7 +40,6 @@ import Annex.Hook
import Annex.InodeSentinal
import Upgrade
import Annex.Perms
-import qualified Database.Keys
import Utility.UserInfo
#ifndef mingw32_HOST_OS
import Utility.FileMode
@@ -90,7 +90,7 @@ initialize' mversion = do
setVersion (fromMaybe defaultVersion mversion)
whenM versionSupportsUnlockedPointers $ do
configureSmudgeFilter
- Database.Keys.scanAssociatedFiles
+ scanUnlockedFiles
v <- checkAdjustedClone
case v of
NeedUpgradeForAdjustedClone ->