Skip to content

Commit

Permalink
Add inline docs for --terminal-persistence modes (#4076)
Browse files Browse the repository at this point in the history
Signed-off-by: Shon Feder <shon.feder@gmail.com>
  • Loading branch information
shonfeder authored Jan 6, 2021
1 parent 48f589a commit cdbfabe
Showing 1 changed file with 11 additions and 6 deletions.
17 changes: 11 additions & 6 deletions bin/common.ml
Original file line number Diff line number Diff line change
Expand Up @@ -487,14 +487,19 @@ let term =
[ "debug-artifact-substitution" ]
~docs ~doc:"Print debugging info about artifact substitution")
and+ terminal_persistence =
let modes = Config.Terminal_persistence.all in
let doc =
let f s = fst s |> Printf.sprintf "$(b,%s)" in
Printf.sprintf
{|Changes how the log of build results are displayed to the
console between rebuilds while in $(b,--watch) mode. Supported modes:
%s.|}
(List.map ~f modes |> String.concat ~sep:", ")
in
Arg.(
value
& opt (some (enum Config.Terminal_persistence.all)) None
& info [ "terminal-persistence" ] ~docs ~docv:"MODE"
~doc:
{|
Changes how the log of build results are displayed to the
console between rebuilds while in --watch mode. |})
& opt (some (enum modes)) None
& info [ "terminal-persistence" ] ~docs ~docv:"MODE" ~doc)
and+ display = display_term
and+ no_buffer =
let doc =
Expand Down

0 comments on commit cdbfabe

Please sign in to comment.