diff options
| author | Richard W.M. Jones <rjones@redhat.com> | 2011-10-27 13:45:22 +0100 |
|---|---|---|
| committer | Richard W.M. Jones <rjones@redhat.com> | 2011-10-27 13:45:22 +0100 |
| commit | 6edd6cdebadab0117bc602f02e0dc68ea7d1a2ef (patch) | |
| tree | 3ae6a78954e9313cf203300b28ffe9a8046b7e21 /generator/generator_fish.ml | |
| parent | 7b44f7b3df0b20b2b5e889d89e82a35eed20d43e (diff) | |
generator: Remove DangerWillRobinson.
This warning was applied unevenly. Potentially any command can be
dangerous or safe, so it was a needless warning.
Diffstat (limited to 'generator/generator_fish.ml')
| -rw-r--r-- | generator/generator_fish.ml | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/generator/generator_fish.ml b/generator/generator_fish.ml index dc2dc3ea..6d6a5712 100644 --- a/generator/generator_fish.ml +++ b/generator/generator_fish.ml @@ -136,16 +136,6 @@ Guestfish will prompt for these separately." ("\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 - *) - let warnings = - warnings ^ - if List.mem DangerWillRobinson flags then - ("\n\n" ^ danger_will_robinson) - else "" in - let warnings = warnings ^ match deprecation_notice flags with @@ -865,9 +855,6 @@ Guestfish will prompt for these separately.\n\n"; if List.mem ProtocolLimitWarning flags then pr "%s\n\n" protocol_limit_warning; - if List.mem DangerWillRobinson flags then - pr "%s\n\n" danger_will_robinson; - match deprecation_notice flags with | None -> () | Some txt -> pr "%s\n\n" txt |