diff options
author | Ben Sima <ben@bsima.me> | 2021-11-30 11:11:01 -0500 |
---|---|---|
committer | Ben Sima <ben@bsima.me> | 2021-11-30 11:11:01 -0500 |
commit | 111ae9cdba0c37a7cc3746a66a33b66c23f057ff (patch) | |
tree | 4dbfc340fe8eb4ff4ec0e80a56b8c349215291e8 /Biz/Dragons | |
parent | f3c89debf2c7fe23d054cca2facc701ba2dee237 (diff) |
Add comment
Diffstat (limited to 'Biz/Dragons')
-rw-r--r-- | Biz/Dragons/Analysis.hs | 4 |
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 |