diff options
| author |  Joey Hess <joey@kitenet.net> | 2010-11-22 17:51:55 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2010-11-22 17:51:55 -0400 |
| commit | eeae91024285c85a7e77b1b44e501a63bced7154 (patch) | |
| tree | ece6c1d1e670e04001dd570a375ed9954078da0a /Version.hs | |
| parent | 57adb0347bf4eb71ab846a2947680a20263449a2 (diff) | |
finished hlinting
Diffstat (limited to 'Version.hs')
| -rw-r--r-- | Version.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Version.hs b/Version.hs index ce39c0c1b..839470120 100644 --- a/Version.hs +++ b/Version.hs @@ -25,13 +25,13 @@ getVersion :: Annex (Maybe String) getVersion = do g <- Annex.gitRepo let v = Git.configGet g versionField "" - if (not $ null v) + if not $ null v then return $ Just v else do -- version 0 was not recorded in .git/config; -- such a repo should have an annexDir d <- liftIO $ doesDirectoryExist $ annexDir g - if (d) + if d then return $ Just "0" else return Nothing -- no version yet |