summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard Jones <rjones@redhat.com>2009-11-17 20:00:17 +0000
committerRichard Jones <rjones@redhat.com>2009-11-17 20:14:47 +0000
commit3fc9951016d08e2467375e24094a468713637c1f (patch)
treedf532b422a9bab03d470b3912757b8a1ee589058
parent540c85a1102c5876265502f8ae287ea697834d20 (diff)
downloadlibguestfs-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.
-rw-r--r--fish/fish.c2
-rw-r--r--src/generator.ml8
2 files changed, 6 insertions, 4 deletions
diff --git a/fish/fish.c b/fish/fish.c
index 3f534def..41c6cbf5 100644
--- a/fish/fish.c
+++ b/fish/fish.c
@@ -457,7 +457,7 @@ pod2text (const char *name, const char *shortdesc, const char *str)
printf ("%s - %s\n\n%s\n", name, shortdesc, str);
return;
}
- fprintf (fp, "=head1 %s - %s\n\n", name, shortdesc);
+ fprintf (fp, "=head1 NAME\n\n%s - %s\n\n", name, shortdesc);
fputs (str, fp);
pclose (fp);
}
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";