diff options
| author | Richard Jones <rjones@redhat.com> | 2009-11-17 20:00:17 +0000 |
|---|---|---|
| committer | Richard Jones <rjones@redhat.com> | 2009-11-17 20:14:47 +0000 |
| commit | 3fc9951016d08e2467375e24094a468713637c1f (patch) | |
| tree | df532b422a9bab03d470b3912757b8a1ee589058 /src | |
| parent | 540c85a1102c5876265502f8ae287ea697834d20 (diff) | |
| download | libguestfs-3fc9951016d08e2467375e24094a468713637c1f.tar.gz libguestfs-3fc9951016d08e2467375e24094a468713637c1f.tar.xz libguestfs-3fc9951016d08e2467375e24094a468713637c1f.zip | |
fish: Improve output of guestfish -h cmd
Display this output like a short manual page.
Don't put <..> around the parameters to the command.
Diffstat (limited to 'src')
| -rw-r--r-- | src/generator.ml | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/src/generator.ml b/src/generator.ml index 4499eb72..c5f21df1 100644 --- a/src/generator.ml +++ b/src/generator.ml @@ -6617,8 +6617,8 @@ and generate_fish_cmds () = match snd style with | [] -> name2 | args -> - sprintf "%s <%s>" - name2 (String.concat "> <" (List.map name_of_argt args)) in + sprintf "%s %s" + name2 (String.concat " " (List.map name_of_argt args)) in let warnings = if List.mem ProtocolLimitWarning flags then @@ -6655,7 +6655,9 @@ and generate_fish_cmds () = pr ")\n"; pr " pod2text (\"%s\", _(\"%s\"), %S);\n" name2 shortdesc - (" " ^ synopsis ^ "\n\n" ^ longdesc ^ warnings ^ describe_alias); + ("=head1 SYNOPSIS\n\n " ^ synopsis ^ "\n\n" ^ + "=head1 DESCRIPTION\n\n" ^ + longdesc ^ warnings ^ describe_alias); pr " else\n" ) all_functions; pr " display_builtin_command (cmd);\n"; |