diff options
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r-- | perl-install/install_steps_interactive.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index a059f92b0..6fd0462b9 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -74,6 +74,13 @@ so the messages will be displayed in english during installation") if $ENV{LANGU sub acceptLicense { my ($o) = @_; + $o->{release_notes} = do { + my $f = install_any::getFile('release-notes.txt'); + join('', <$f>); + }; + + return if $o->{useless_thing_accepted}; + my $r = $::testing ? 'Accept' : 'Refuse'; ($::recovery ? |