diff options
author | Olivier Blin <oblin@mandriva.org> | 2005-08-04 05:36:32 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.org> | 2005-08-04 05:36:32 +0000 |
commit | 0d24be00b8d7401ebf4250a12216f033b89b8f92 (patch) | |
tree | 415530f92860e49ef49cd1dfe3385410d9c048c9 /perl-install/standalone/draksplash | |
parent | 8649f571217683ebc5db31757f4f58173a7b6bbe (diff) | |
download | drakx-backup-do-not-use-0d24be00b8d7401ebf4250a12216f033b89b8f92.tar drakx-backup-do-not-use-0d24be00b8d7401ebf4250a12216f033b89b8f92.tar.gz drakx-backup-do-not-use-0d24be00b8d7401ebf4250a12216f033b89b8f92.tar.bz2 drakx-backup-do-not-use-0d24be00b8d7401ebf4250a12216f033b89b8f92.tar.xz drakx-backup-do-not-use-0d24be00b8d7401ebf4250a12216f033b89b8f92.zip |
update progress bar adjustments from preview
Diffstat (limited to 'perl-install/standalone/draksplash')
-rwxr-xr-x | perl-install/standalone/draksplash | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash index f432e1bcf..231fd491d 100755 --- a/perl-install/standalone/draksplash +++ b/perl-install/standalone/draksplash @@ -193,8 +193,8 @@ sub create_adj_widgets() { $adj{$_} = Gtk2::Adjustment->new(0, 0, 0, 1, 10, 0) foreach keys %scale_settings; my %scale_links = (tx => 'tw', ty => 'th', px => 'pw', py => 'ph'); while (my ($n1, $n2) = each(%scale_links)) { - $adj{$n1}->signal_connect(value_changed => sub { check_scale_value($n1, $n2); apply_scale($n1) }); - $adj{$n2}->signal_connect(value_changed => sub { check_scale_value($n2, $n1); apply_scale($n2) }); + $adj{$n1}{on_change} = $adj{$n1}->signal_connect(value_changed => sub { check_scale_value($n1, $n2); apply_scale($n1) }); + $adj{$n2}{on_change} = $adj{$n2}->signal_connect(value_changed => sub { check_scale_value($n2, $n1); apply_scale($n2) }); } } sub create_scale_table { @@ -225,9 +225,11 @@ sub update_scales_for_resolution() { $adj{$_}->upper(get_scale_max($_)) foreach keys %adj; } sub update_scale_values_from_conf() { - # this is broken ! - # use ->set_value - $adj{$_}{value} = $theme{conf}{$_} foreach keys %adj; + foreach (keys %adj) { + $adj{$_}->signal_handler_block($adj{$_}{on_change}); + $adj{$_}->set_value($theme{conf}{$_}) ; + $adj{$_}->signal_handler_unblock($adj{$_}{on_change}) + }; } sub create_image_area() { |