diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2009-03-23 18:21:35 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2009-03-23 18:21:35 +0000 |
| commit | 1fbdc6f5ad3ef17fa36b564e6675a8c45ee66b7f (patch) | |
| tree | 4696eba607a143ea8c7659f868094691d496c107 | |
| parent | dbaf8aaf7216f72d4bccbab0c6aa643a581547ab (diff) | |
| download | drakx-backup-do-not-use-1fbdc6f5ad3ef17fa36b564e6675a8c45ee66b7f.tar drakx-backup-do-not-use-1fbdc6f5ad3ef17fa36b564e6675a8c45ee66b7f.tar.gz drakx-backup-do-not-use-1fbdc6f5ad3ef17fa36b564e6675a8c45ee66b7f.tar.bz2 drakx-backup-do-not-use-1fbdc6f5ad3ef17fa36b564e6675a8c45ee66b7f.tar.xz drakx-backup-do-not-use-1fbdc6f5ad3ef17fa36b564e6675a8c45ee66b7f.zip | |
(ask_deselect_media__copy_on_disk) fix typo in latest commit
| -rw-r--r-- | perl-install/install/steps_gtk.pm | 2 | ||||
| -rw-r--r-- | perl-install/install/steps_interactive.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index 8b836ecd6..764808da0 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -758,7 +758,7 @@ It will then continue from the hard drive and the packages will remain available ); $w->main; } - !$_->{ignore} = $selection{$_->{name}} foreach @$hdlists; + $_->{ignore} = !$selection{$_->{name}} foreach @$hdlists; log::l("keeping media " . join ',', map { $_->{rpmsdir} } grep { !$_->{ignore} } @$hdlists); } diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm index 03d89d033..d43753420 100644 --- a/perl-install/install/steps_interactive.pm +++ b/perl-install/install/steps_interactive.pm @@ -342,7 +342,7 @@ It will then continue from the hard drive and the packages will remain available { type => 'bool', text => N("Copy whole CDs"), val => $o_copy_rpms_on_disk }, ), ]); - !$_->{ignore} = $selection{$_->{name}} foreach @$hdlists; + $_->{ignore} = !$selection{$_->{name}} foreach @$hdlists; log::l("keeping media " . join ',', map { $_->{rpmsdir} } grep { !$_->{ignore} } @$hdlists); } |