{-# LANGUAGE ApplicativeDo #-}
{-# LANGUAGE RecordWildCards #-}

module Opts where

import Paths_clusterpainter (version)
import Data.Version (showVersion)

import Options.Applicative

data Opts = Opts deriving Show

parseOpts :: IO Opts
parseOpts =
  customExecParser (prefs $ showHelpOnEmpty)
    $ info
        (opts <**> helper <**> simpleVersioner (showVersion version))
        (fullDesc
           <> header "git-deli -- delinearized git workflow"
           <> (footer
                 "This program is free software; see LICENSE file for details."))