sudden outbreak of haskells

1 files changed, 21 insertions, 0 deletions

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."))