module Stackctl.Version
  ( logVersion
  ) where

import Stackctl.Prelude

import Data.Version
import qualified Paths_stackctl as Pkg
import Prelude (putStrLn)

logVersion :: MonadIO m => m ()
logVersion :: forall (m :: * -> *). MonadIO m => m ()
logVersion = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ String -> IO ()
putStrLn forall a b. (a -> b) -> a -> b
$ (String
"Stackctl v" forall a. Semigroup a => a -> a -> a
<>) forall a b. (a -> b) -> a -> b
$ Version -> String
showVersion Version
Pkg.version