Restore default behavior

Author: Leonidas-from-XIV

bin/main.ml

@@ -17,11 +17,13 @@
 open Cmdliner
 
 let cmds = [ Test.cmd; Pp.cmd; Deps.cmd; Dune_gen.cmd ]
+let main (`Setup ()) = `Help (`Pager, None)
 
-let main =
+let info =
   let doc = "Execute markdown files." in
   let man = [] in
   Cmd.info "ocaml-mdx" ~version:"%%VERSION%%" ~doc ~man
 
-let group = Cmd.group main cmds
+let default = Term.(ret (const main $ Cli.setup))
+let group = Cmd.group ~default info cmds
 let () = Stdlib.exit @@ Cmd.eval' group

test/bin/gen_rule_helpers/gen_rule_helpers.ml

@@ -157,5 +157,6 @@ let run generator =
     let man = [] in
     Cmd.info "gen_dune_rules" ~doc ~man
   in
-  let group = Cmd.group info cmds in
+  let default = Term.(ret (const (`Help (`Auto, None)))) in
+  let group = Cmd.group ~default info cmds in
   Stdlib.exit @@ Cmd.eval group