From 335f37c340f8778d158fc3cfe625e50af138bfc4 Mon Sep 17 00:00:00 2001 From: Mirek Kratochvil Date: Tue, 28 Apr 2026 21:00:35 +0200 Subject: sudden outbreak of haskells --- Opts.hs | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 Opts.hs (limited to 'Opts.hs') diff --git a/Opts.hs b/Opts.hs new file mode 100644 index 0000000..70dff3f --- /dev/null +++ b/Opts.hs @@ -0,0 +1,21 @@ +{-# 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.")) -- cgit v1.2.3