Source file cmd_output_overview.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
open! Oxbow_ipc

let command_term = Cmdliner.Term.const (Command.Output Toggle_overview)
let name = "overview"
let doc = "Toggle the overview grid"

let cmd, bind_cmd =
  Ctl_cli.group_pair
    ~name
    ~doc
    ~default:command_term
    [ Cmd_output_overview_cycle.(cmd, bind_cmd) ]
;;