diff options
| author | Olivier Blin <oblin@mandriva.org> | 2005-05-09 06:01:33 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.org> | 2005-05-09 06:01:33 +0000 |
| commit | a2cc67e764fc10676a37071657b9a1cc861812e3 (patch) | |
| tree | a20ea6e276561f60fb987234bea52ce25951ff05 /perl-install/standalone/draksplash | |
| parent | c90c01b4a5fa7627644a074bddf27bb0b894f468 (diff) | |
| download | drakx-backup-do-not-use-a2cc67e764fc10676a37071657b9a1cc861812e3.tar drakx-backup-do-not-use-a2cc67e764fc10676a37071657b9a1cc861812e3.tar.gz drakx-backup-do-not-use-a2cc67e764fc10676a37071657b9a1cc861812e3.tar.bz2 drakx-backup-do-not-use-a2cc67e764fc10676a37071657b9a1cc861812e3.tar.xz drakx-backup-do-not-use-a2cc67e764fc10676a37071657b9a1cc861812e3.zip | |
fix layout, update scale factors when the theme name is changed too
Diffstat (limited to 'perl-install/standalone/draksplash')
| -rwxr-xr-x | perl-install/standalone/draksplash | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash index 98c5bcc92..9e9bca2f3 100755 --- a/perl-install/standalone/draksplash +++ b/perl-install/standalone/draksplash @@ -41,7 +41,7 @@ set_theme('new_theme'); set_resolution(@resolutions); gtkadd($window->{window}, - gtkadd(Gtk2::HBox->new(1, 5), + gtkadd(Gtk2::HBox->new(0, 5), gtkadd(Gtk2::VBox->new(0, 5), gtkadd(Gtk2::Frame->new(N("first step creation")), create_packtable({ col_spacings => 10, row_spacings => 5 }, @@ -105,10 +105,6 @@ sub set_resolution { $theme{res} = $res; ($theme{res_w}, $theme{res_h}) = $theme{res} =~ /([^x]+)x([^x]+)/; read_theme_config(); - foreach (keys %scale_settings) { - $theme{conf}{$_} eq '' and $theme{conf}{$_} = get_scale_max($_) * $scale_settings{$_}[0]; - } - update_scale_values(); $image_area->set_size_request($theme{res_w}, $theme{res_w}); } @@ -177,6 +173,9 @@ sub check_scale_value { $adj{$linked}->get_value > $max and $adj{$linked}->set_value($max); } sub update_scale_values { + foreach (keys %scale_settings) { + $theme{conf}{$_} eq '' and $theme{conf}{$_} = get_scale_max($_) * $scale_settings{$_}[0]; + } foreach (keys %adj) { $adj{$_}->upper(get_scale_max($_)); $adj{$_}->set_value($theme{conf}{$_}); |