summaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard Jones <rjones@redhat.com>2010-07-22 10:59:43 +0100
committerRichard Jones <rjones@redhat.com>2010-07-22 10:59:43 +0100
commit2a286f16215ebfac88a32d259f2b68191eb8d27e (patch)
tree4225fe7c8b10471c7b592171465385149eff4e73 /src
parente67298ce806c75b687e1812168bfa5aa19a83302 (diff)
downloadlibguestfs-2a286f16215ebfac88a32d259f2b68191eb8d27e.tar.gz
libguestfs-2a286f16215ebfac88a32d259f2b68191eb8d27e.tar.xz
libguestfs-2a286f16215ebfac88a32d259f2b68191eb8d27e.zip
generator: Make documentation inside guestfish match man page.
Diffstat (limited to 'src')
-rwxr-xr-xsrc/generator.ml11
1 files changed, 9 insertions, 2 deletions
diff --git a/src/generator.ml b/src/generator.ml
index 71421bc6..69f561c1 100755
--- a/src/generator.ml
+++ b/src/generator.ml
@@ -7773,10 +7773,17 @@ and generate_fish_cmds () =
name2 (String.concat " " (List.map name_of_argt args)) in
let warnings =
- if List.mem ProtocolLimitWarning flags then
- ("\n\n" ^ protocol_limit_warning)
+ if List.exists (function Key _ -> true | _ -> false) (snd style) then
+ "\n\nThis command has one or more key or passphrase parameters.
+Guestfish will prompt for these separately."
else "" in
+ let warnings =
+ warnings ^
+ if List.mem ProtocolLimitWarning flags then
+ ("\n\n" ^ protocol_limit_warning)
+ else "" in
+
(* For DangerWillRobinson commands, we should probably have
* guestfish prompt before allowing you to use them (especially
* in interactive mode). XXX