diff options
Diffstat (limited to 'Upgrade/V1.hs')
-rw-r--r-- | Upgrade/V1.hs | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/Upgrade/V1.hs b/Upgrade/V1.hs index 270de5f74..43f279ad0 100644 --- a/Upgrade/V1.hs +++ b/Upgrade/V1.hs @@ -115,8 +115,12 @@ moveLocationLogs = do oldlocationlogs = do g <- Annex.gitRepo let dir = gitStateDir g - contents <- liftIO $ getDirectoryContents dir - return $ catMaybes $ map oldlog2key contents + exists <- liftIO $ doesDirectoryExist dir + if exists + then do + contents <- liftIO $ getDirectoryContents dir + return $ catMaybes $ map oldlog2key contents + else return [] move (l, k) = do g <- Annex.gitRepo let dest = logFile g k |