diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-03-16 02:15:54 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-03-16 02:16:25 -0400 |
| commit | a4d0250298a503c7d9093e6dd1618ff5b07b19e5 (patch) | |
| tree | b47ca090446bae9c713eda47ba0425c8eb89390c /Upgrade.hs | |
| parent | e227c210ec817eca6b4409cb4cc893f791d51c00 (diff) | |
slways set current version in new repos
detect v1 repos that don't have a version set
Diffstat (limited to 'Upgrade.hs')
| -rw-r--r-- | Upgrade.hs | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/Upgrade.hs b/Upgrade.hs index a15258204..76dd156f8 100644 --- a/Upgrade.hs +++ b/Upgrade.hs @@ -17,8 +17,7 @@ upgrade :: Annex Bool upgrade = do version <- getVersion case version of - Just "0" -> Upgrade.V0.upgrade - Just "1" -> Upgrade.V1.upgrade - Nothing -> return True -- repo not initted yet, no version - Just v | v == currentVersion -> return True - Just _ -> error "this version of git-annex is too old for this git repository!" + "0" -> Upgrade.V0.upgrade + "1" -> Upgrade.V1.upgrade + v | v == currentVersion -> return True + _ -> error "this version of git-annex is too old for this git repository!" |