diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2008-09-29 11:06:13 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2008-09-29 11:06:13 +0000 |
commit | eef67a1c9d9bf24315c326ddc67fee0cfb2ab525 (patch) | |
tree | e324f6198e5975fb30273a06fa6f617ef7129000 | |
parent | d6654de7b609f614efa1833e340b3f6009eb017b (diff) | |
download | drakx-eef67a1c9d9bf24315c326ddc67fee0cfb2ab525.tar drakx-eef67a1c9d9bf24315c326ddc67fee0cfb2ab525.tar.gz drakx-eef67a1c9d9bf24315c326ddc67fee0cfb2ab525.tar.bz2 drakx-eef67a1c9d9bf24315c326ddc67fee0cfb2ab525.tar.xz drakx-eef67a1c9d9bf24315c326ddc67fee0cfb2ab525.zip |
- ask_deselect_media__copy_on_disk:
o do not select all media by default (eg: debug media)
(nb: this dialog occurs when user chooses "Go back to media and packages
selection" on pkg install error)
-rw-r--r-- | perl-install/install/NEWS | 8 | ||||
-rw-r--r-- | perl-install/install/steps_gtk.pm | 2 |
2 files changed, 7 insertions, 3 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 4aeed59bb..19f1c73ae 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,5 +1,9 @@ -- ask_deselect_media__copy_on_disk: replace scrolled window around everything - with a scrolled window around the list of checkboxes +- ask_deselect_media__copy_on_disk: + o do not select all media by default (eg: debug media) + (nb: this dialog occurs when user chooses "Go back to media and packages + selection" on pkg install error) + o replace scrolled window around everything + with a scrolled window around the list of checkboxes - adapt to fonts-ttf-gurmukhi => fonts-ttf-lohit switch - add spacing between radio buttons for readability (#44332) - better positionning of sidepanel's selection bar diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index 91967bccd..0b211221b 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -701,7 +701,7 @@ sub ask_deselect_media__copy_on_disk { my ($_o, $hdlists, $o_copy_rpms_on_disk) = @_; my @names = uniq(map { $_->{name} } @$hdlists); - my %selection = map { $_ => 1 } @names; + my %selection = map { $_->{name} => $_->{selected} } @$hdlists; if (@names > 1 || $o_copy_rpms_on_disk) { my $w = ugtk2->new(N("Media Selection")); |