From 251e5e64a5cf7fa42d69ce724286e11ffe651c1f Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sun, 21 Apr 2013 00:20:45 +0000 Subject: add support for new media help --- perl-install/install/any.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm index 918a89103..d4f4cba06 100644 --- a/perl-install/install/any.pm +++ b/perl-install/install/any.pm @@ -126,6 +126,7 @@ Do you have a supplementary installation medium to configure?", ); $o->ask_from_({ messages => $msg, + interactive_help_id => 'add_supplemental_media', }, [ { val => \my $suppl, @@ -364,6 +365,7 @@ sub media_screen { N("Here you can enable more media if you want."), msg_if_firmware_needed($o) ), + interactive_help_id => 'media_selection', focus_first => sub { 1 } }, [ map { my $medium = $_; -- cgit v1.2.1