summaryrefslogtreecommitdiff
path: root/Upgrade/V1.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Upgrade/V1.hs')
-rw-r--r--Upgrade/V1.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Upgrade/V1.hs b/Upgrade/V1.hs
index 377e4b21b..567cf8e5b 100644
--- a/Upgrade/V1.hs
+++ b/Upgrade/V1.hs
@@ -51,7 +51,7 @@ upgrade :: Annex Bool
upgrade = do
showAction "v1 to v2"
- bare <- fromRepo $ Git.repoIsLocalBare
+ bare <- fromRepo Git.repoIsLocalBare
if bare
then do
moveContent
@@ -113,7 +113,7 @@ moveLocationLogs = do
else return []
move (l, k) = do
dest <- fromRepo $ logFile2 k
- dir <- fromRepo $ Upgrade.V2.gitStateDir
+ dir <- fromRepo Upgrade.V2.gitStateDir
let f = dir </> l
liftIO $ createDirectoryIfMissing True (parentDir dest)
-- could just git mv, but this way deals with