diff options
author | Olivier Blin <oblin@mandriva.com> | 2008-04-02 23:31:47 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2008-04-02 23:31:47 +0000 |
commit | 5a3fc63c8ef1c21975d1129c2827ebb8094c1526 (patch) | |
tree | 8472d3b07c8ea0cc89b61c40ce850434bcaa21e6 /perl-install | |
parent | 451f2e39b0fe502e007d73ef516bdd1a84213ef2 (diff) | |
download | drakx-5a3fc63c8ef1c21975d1129c2827ebb8094c1526.tar drakx-5a3fc63c8ef1c21975d1129c2827ebb8094c1526.tar.gz drakx-5a3fc63c8ef1c21975d1129c2827ebb8094c1526.tar.bz2 drakx-5a3fc63c8ef1c21975d1129c2827ebb8094c1526.tar.xz drakx-5a3fc63c8ef1c21975d1129c2827ebb8094c1526.zip |
do not write decimal values in theme config (#38271)
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/NEWS | 3 | ||||
-rwxr-xr-x | perl-install/standalone/draksplash | 4 |
2 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 36d774feb..7c4460900 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,6 @@ +- draksplash: + o do not write decimal values in theme config (#38271) + Version 10.25 - 1 April 2008 - DBus framework improvement diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash index 475acf5d3..72c9fcaf4 100755 --- a/perl-install/standalone/draksplash +++ b/perl-install/standalone/draksplash @@ -234,7 +234,7 @@ sub get_scale_max { } sub apply_scale { my ($name) = @_; - $theme{conf}{$name} = $adj{$name}->get_value; + $theme{conf}{$name} = int($adj{$name}->get_value); update_rect(); $image_area->queue_draw; } @@ -244,7 +244,7 @@ sub check_scale_value { $adj{$linked}->get_value > $max and $adj{$linked}->set_value($max); } sub update_scales_for_resolution() { - $theme{conf}{$_} ||= get_scale_max($_) * $scale_settings{$_}[0] foreach keys %scale_settings; + $theme{conf}{$_} ||= int(get_scale_max($_) * $scale_settings{$_}[0]) foreach keys %scale_settings; $adj{$_}->upper(get_scale_max($_)) foreach keys %adj; } sub update_scale_values_from_conf() { |