diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-05-11 04:05:03 -0400 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-07-05 22:39:24 +0200 |
commit | 8cd9c7cadbb8c35b618742691c525b7e39ebe435 (patch) | |
tree | 21aa7613c9865a95f10a46b2f69f0defab3bdc97 /perl-install/install/any.pm | |
parent | b6b524347edef36930ccdce12c0eb8ba57cb0c00 (diff) | |
download | drakx-8cd9c7cadbb8c35b618742691c525b7e39ebe435.tar drakx-8cd9c7cadbb8c35b618742691c525b7e39ebe435.tar.gz drakx-8cd9c7cadbb8c35b618742691c525b7e39ebe435.tar.bz2 drakx-8cd9c7cadbb8c35b618742691c525b7e39ebe435.tar.xz drakx-8cd9c7cadbb8c35b618742691c525b7e39ebe435.zip |
remember selected media (mga#12299)
Diffstat (limited to 'perl-install/install/any.pm')
-rw-r--r-- | perl-install/install/any.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm index b671a5b18..0a2675065 100644 --- a/perl-install/install/any.pm +++ b/perl-install/install/any.pm @@ -983,6 +983,9 @@ sub g_auto_install { #- deep copy because we're modifying it below $o->{users} = $b_respect_privacy ? [] : [ @{$o->{users} || []} ]; + # remember selected media: + local $o->{enabled_media} = [ map { $_->{name} } grep { !$_->{ignore} } @{$::o->{packages}{media}} ]; + my @user_info_to_remove = ( if_($b_respect_privacy, qw(realname pw)), qw(oldu oldg password password2), |