diff options
Diffstat (limited to 'Command/Upgrade.hs')
| -rw-r--r-- | Command/Upgrade.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Command/Upgrade.hs b/Command/Upgrade.hs index 432250a1a..223be581d 100644 --- a/Command/Upgrade.hs +++ b/Command/Upgrade.hs @@ -9,6 +9,8 @@ module Command.Upgrade where import Command import Upgrade +import Annex.Version +import Annex.Init cmd :: Command cmd = dontCheck repoExists $ -- because an old version may not seem to exist @@ -22,5 +24,7 @@ seek = withNothing start start :: CommandStart start = do showStart "upgrade" "." + whenM (isNothing <$> getVersion) $ do + initialize Nothing Nothing r <- upgrade False next $ next $ return r |