Source file `cmd_window_column.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
let name = "column"
let doc = "Operate on the column of the focused window"

let cmd =
  Ctl_cli.group
    ~name
    ~doc
    [ Cmd_window_column_consume.cmd
    ; Cmd_window_column_release.cmd
    ; Cmd_window_column_move.cmd
    ; Cmd_window_column_width.cmd
    ; Cmd_window_column_default.cmd
    ; Cmd_window_column_cycle.cmd
    ]
;;

let bind_cmd =
  Ctl_cli.group
    ~name
    ~doc
    [ Cmd_window_column_consume.bind_cmd
    ; Cmd_window_column_release.bind_cmd
    ; Cmd_window_column_move.bind_cmd
    ; Cmd_window_column_width.bind_cmd
    ; Cmd_window_column_default.bind_cmd
    ; Cmd_window_column_cycle.bind_cmd
    ]
;;