diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2026-04-01 19:33:07 +0200 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2026-04-01 19:33:07 +0200 |
| commit | 10327858acc48286cec97ebc4f01b6aa2e7ae460 (patch) | |
| tree | 35a4e45a03b16b046c18646206e65832308f7343 /src/Version.hs | |
| parent | 1eacd0f0b02c40c94d063d4cebc2343c882f50bb (diff) | |
Derive version number from git if available
Diffstat (limited to 'src/Version.hs')
| -rw-r--r-- | src/Version.hs | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/src/Version.hs b/src/Version.hs new file mode 100644 index 0000000..cca3c6d --- /dev/null +++ b/src/Version.hs @@ -0,0 +1,16 @@ +module Version ( + versionLine, +) where + +import Paths_erebos_webapp (version) +import Data.Version (showVersion) +import Version.Git + +{-# NOINLINE versionLine #-} +versionLine :: String +versionLine = do + let ver = case gitVersion of + Just gver + -> "git " <> gver + _ -> "v" <> showVersion version + in ver |