summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-05-09 06:01:33 +0000
committerOlivier Blin <oblin@mandriva.org>2005-05-09 06:01:33 +0000
commita2cc67e764fc10676a37071657b9a1cc861812e3 (patch)
treea20ea6e276561f60fb987234bea52ce25951ff05 /perl-install/standalone
parentc90c01b4a5fa7627644a074bddf27bb0b894f468 (diff)
downloaddrakx-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')
-rwxr-xr-xperl-install/standalone/draksplash9
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}{$_});