diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2021-03-08 15:17:15 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2026-01-19 17:37:50 +0100 |
| commit | 17b8ec62c1ec6006e52b0303273e392941dad834 (patch) | |
| tree | 2eefcb0866afc9573c0c61f96a3ecc1f94290bb3 /perl-install/install/steps_interactive.pm | |
| parent | 74d3f9dd8a47e444ff6ea4b04deec51edbe84785 (diff) | |
| download | drakx-17b8ec62c1ec6006e52b0303273e392941dad834.tar drakx-17b8ec62c1ec6006e52b0303273e392941dad834.tar.gz drakx-17b8ec62c1ec6006e52b0303273e392941dad834.tar.bz2 drakx-17b8ec62c1ec6006e52b0303273e392941dad834.tar.xz drakx-17b8ec62c1ec6006e52b0303273e392941dad834.zip | |
PODify the installer
Diffstat (limited to 'perl-install/install/steps_interactive.pm')
| -rw-r--r-- | perl-install/install/steps_interactive.pm | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm index aaacd7fba..3a2586cae 100644 --- a/perl-install/install/steps_interactive.pm +++ b/perl-install/install/steps_interactive.pm @@ -31,6 +31,16 @@ use keyboard; use any; use log; +=head1 SYNOPSYS + +Handle the interactive installer steps (text & graphical). + +=head1 Functions + +=over + +=cut + #-###################################################################################### #- In/Out Steps Functions #-###################################################################################### @@ -845,6 +855,16 @@ sub summaryBefore { log::l("summaryBefore: network configuration: ", formatError($@)) if $@; } + + +=item summary_prompt($o, $l, $check_complete) + +Display the summary once the package installation is complete. +This is the text version which is overloaded in L<steps_gtk>. + +=cut + + sub summary_prompt { my ($o, $l, $check_complete) = @_; @@ -861,6 +881,13 @@ sub summary_prompt { }, $l); } + +=item summary($o) + +Create the list of categories for the summary that will be displayed by summary_prompt() + +=cut + sub summary { my ($o) = @_; |
