{-# LANGUAGE TemplateHaskell #-}

module Network.Mattermost.Version (mmApiVersion) where

import Data.Version (showVersion)
import Development.GitRev (gitBranch, gitHash)
import Paths_mattermost_api (version)

mmApiVersion :: String
mmApiVersion :: String
mmApiVersion
  | $(gitHash) forall a. Eq a => a -> a -> Bool
== (String
"UNKNOWN" :: String) = String
"mattermost-api " forall a. [a] -> [a] -> [a]
++ Version -> String
showVersion Version
version
  | Bool
otherwise = String
"mattermost-api " forall a. [a] -> [a] -> [a]
++ Version -> String
showVersion Version
version forall a. [a] -> [a] -> [a]
++ String
" (" forall a. [a] -> [a] -> [a]
++
                $(gitBranch) forall a. [a] -> [a] -> [a]
++ String
"@" forall a. [a] -> [a] -> [a]
++ forall a. Int -> [a] -> [a]
take Int
7 $(gitHash) forall a. [a] -> [a] -> [a]
++ String
")"