summaryrefslogtreecommitdiff
path: root/src/Main.hs
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2023-03-01 21:51:24 +0100
committerRoman Smrž <roman.smrz@seznam.cz>2023-03-01 21:51:24 +0100
commitdf1cc5d142e8d0e332341b82eb581e77c328f687 (patch)
tree218aad7a946574b794a4658c36dbef59019e1c29 /src/Main.hs
parent8f4bb4eddb4dabf20a9256d406a1b9823a54879b (diff)
Version information from git
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs6
1 files changed, 2 insertions, 4 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 404ecec..adb738e 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -26,9 +26,6 @@ import System.Posix.Process
import System.Posix.Signals
import System.Process
-import Paths_erebos_tester (version)
-import Data.Version (showVersion)
-
import Config
import GDB
import Network
@@ -38,6 +35,7 @@ import Process
import Run.Monad
import Test
import Util
+import Version
withVar :: ExprType e => VarName -> e -> TestRun a -> TestRun a
withVar name value = local (fmap $ \s -> s { tsVars = (name, SomeVarValue value) : tsVars s })
@@ -356,7 +354,7 @@ main = do
where header = "Usage: erebos-tester [OPTION...]"
when (optShowVersion opts) $ do
- putStrLn $ "Erebos Tester version " <> showVersion version
+ putStrLn versionLine
exitSuccess
getPermissions (head $ words $ optDefaultTool $ optTest opts) >>= \perms -> do