diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-12-13 00:24:19 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-12-13 00:24:19 -0400 |
| commit | 94554782894ec6c26da3b46312d5d1d16d596458 (patch) | |
| tree | 78746106bfb153945ccbfd2bbae536081c005e91 /Annex/Version.hs | |
| parent | 55bd61d8c42aaf36a3c57f8444c493f6b045f4cd (diff) | |
finished where indentation changes
Diffstat (limited to 'Annex/Version.hs')
| -rw-r--r-- | Annex/Version.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/Annex/Version.hs b/Annex/Version.hs index 00e574929..30ad957c3 100644 --- a/Annex/Version.hs +++ b/Annex/Version.hs @@ -26,9 +26,9 @@ versionField = annexConfig "version" getVersion :: Annex (Maybe Version) getVersion = handle <$> getConfig versionField "" - where - handle [] = Nothing - handle v = Just v + where + handle [] = Nothing + handle v = Just v setVersion :: Annex () setVersion = setConfig versionField defaultVersion @@ -41,6 +41,6 @@ checkVersion v | v `elem` supportedVersions = noop | v `elem` upgradableVersions = err "Upgrade this repository: git-annex upgrade" | otherwise = err "Upgrade git-annex." - where - err msg = error $ "Repository version " ++ v ++ - " is not supported. " ++ msg + where + err msg = error $ "Repository version " ++ v ++ + " is not supported. " ++ msg |