summaryrefslogtreecommitdiff
path: root/Biz/Dragons/Analysis.hs
diff options
context:
space:
mode:
authorBen Sima <ben@bsima.me>2021-11-30 11:11:01 -0500
committerBen Sima <ben@bsima.me>2021-11-30 11:11:01 -0500
commit111ae9cdba0c37a7cc3746a66a33b66c23f057ff (patch)
tree4dbfc340fe8eb4ff4ec0e80a56b8c349215291e8 /Biz/Dragons/Analysis.hs
parentf3c89debf2c7fe23d054cca2facc701ba2dee237 (diff)
Add comment
Diffstat (limited to 'Biz/Dragons/Analysis.hs')
-rw-r--r--Biz/Dragons/Analysis.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/Biz/Dragons/Analysis.hs b/Biz/Dragons/Analysis.hs
index 4a1421c..f1c1bbd 100644
--- a/Biz/Dragons/Analysis.hs
+++ b/Biz/Dragons/Analysis.hs
@@ -6,6 +6,9 @@
{-# LANGUAGE TupleSections #-}
{-# LANGUAGE NoImplicitPrelude #-}
+-- CLI frontend for running and submitting analyses to the Dragons.dev web
+-- service.
+--
-- : out dragons-analyze
module Biz.Dragons.Analysis
( Analysis (..),
@@ -45,6 +48,7 @@ move args = gitDir +> run authors /> Aeson.encode +> putStrLn
|> Directory.makeAbsolute
authors =
-- i think this is not working? do i need optparse-applicative?
+ -- see: https://github.com/docopt/docopt.hs/issues/25
Cli.shortOption 'a'
|> Cli.getAllArgs args
|> map Text.pack