summaryrefslogtreecommitdiff
path: root/Command/Version.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Version.hs')
-rw-r--r--Command/Version.hs5
1 files changed, 4 insertions, 1 deletions
diff --git a/Command/Version.hs b/Command/Version.hs
index b330d1ff1..13b839e66 100644
--- a/Command/Version.hs
+++ b/Command/Version.hs
@@ -18,7 +18,7 @@ import qualified Remote
import qualified Backend
def :: [Command]
-def = [noCommit $ noRepo showPackageVersion $ dontCheck repoExists $
+def = [noCommit $ noRepo startNoRepo $ dontCheck repoExists $
command "version" paramNothing seek SectionQuery "show version info"]
seek :: [CommandSeek]
@@ -37,6 +37,9 @@ start = do
unwords upgradableVersions
stop
+startNoRepo :: CmdParams -> IO ()
+startNoRepo _ = showPackageVersion
+
showPackageVersion :: IO ()
showPackageVersion = do
info "git-annex version" SysConfig.packageversion