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