Browse Source

Added git revision tracking

Added `transaqConnector_gitrev` field to `Version.hs` to store git revision.
master
Denis Tereshkin 1 year ago
parent
commit
c9048589c4
  1. 15
      src/Version.hs
  2. 1
      transaq-connector.cabal

15
src/Version.hs

@ -1,11 +1,14 @@ @@ -1,11 +1,14 @@
{-# LANGUAGE TemplateHaskell #-}
module Version
(
transaqConnectorVersion,
transaqConnectorVersionText
transaqConnectorVersionText,
transaqConnector_gitrev
) where
import qualified Data.Text as T
import Data.Version
import Development.GitRev
import Paths_transaq_connector
@ -15,3 +18,13 @@ transaqConnectorVersion = version @@ -15,3 +18,13 @@ transaqConnectorVersion = version
transaqConnectorVersionText :: T.Text
transaqConnectorVersionText = T.pack $ showVersion version
transaqConnector_gitrev :: String
transaqConnector_gitrev = concat [ "transaq-connector-",
$(gitBranch),
"@",
$(gitHash),
dirty ]
where
dirty | $(gitDirty) = "+"
| otherwise = ""

1
transaq-connector.cabal

@ -67,6 +67,7 @@ executable transaq-connector @@ -67,6 +67,7 @@ executable transaq-connector
, barbies
, xeno
, megaparsec
, gitrev
extra-lib-dirs: lib
ghc-options: -Wall
-Wcompat

Loading…
Cancel
Save