diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-07-26 10:35:23 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-07-26 10:35:23 +0000 |
| commit | cd21067ce794ec83c374e9fccd3f595f69045677 (patch) | |
| tree | 7207bc56a8b7f89f4ced8e592dd2134ace8aa32e /perl-install/install/steps_gtk.pm | |
| parent | 169180cb11f798ae4abc26846bf8c4fbac27470f (diff) | |
| download | drakx-cd21067ce794ec83c374e9fccd3f595f69045677.tar drakx-cd21067ce794ec83c374e9fccd3f595f69045677.tar.gz drakx-cd21067ce794ec83c374e9fccd3f595f69045677.tar.bz2 drakx-cd21067ce794ec83c374e9fccd3f595f69045677.tar.xz drakx-cd21067ce794ec83c374e9fccd3f595f69045677.zip | |
(reallyChooseGroups) add a scrollbar
(due to Oxygen theme eating more space than Ia Ora one)
Diffstat (limited to 'perl-install/install/steps_gtk.pm')
| -rw-r--r-- | perl-install/install/steps_gtk.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index 33ddae6fe..2ed26ac34 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -333,6 +333,7 @@ sub reallyChooseGroups { #- when restarting this step, it might be necessary to reload the compssUsers.pl (bug 11558). kludgy. if (!ref $o->{gtk_display_compssUsers}) { install::any::load_rate_files($o) } ugtk2::gtkadd($w->{window}, + gtknew('ScrolledWindow', child => gtknew('VBox', children => [ 1, $o->{gtk_display_compssUsers}->($entry), 1, '', @@ -347,6 +348,7 @@ sub reallyChooseGroups { gtknew('Button', text => N("Next"), clicked => sub { Gtk2->main_quit }), ]), ]), + ) ); $w->main; 1; |