diff options
Diffstat (limited to 'perl-install/install/steps_gtk.pm')
-rw-r--r-- | perl-install/install/steps_gtk.pm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index a8f998f7a..24588cbc6 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -234,6 +234,14 @@ sub selectMouse { } } +sub setPackages { + my ($o) = @_; + my (undef, $old_title) = get_default_step_items(); + set_default_step_items(N("Media Selection") || $old_title); + install::any::setPackages($o); + set_default_step_items($old_title); +} + sub reallyChooseDesktop { my ($o, $title, $message, $choices, $choice) = @_; @@ -794,4 +802,5 @@ It will then continue from the hard disk drive and the packages will remain avai log::l("keeping media " . join ',', map { $_->{rpmsdir} } grep { !$_->{ignore} } @$hdlists); } + 1; |