diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2008-07-30 17:35:16 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2008-07-30 17:35:16 +0000 |
| commit | ac285b11833596a5aa250f0083b7852b72374815 (patch) | |
| tree | 8cf1016bc44f2a20b4293adf1ff54b004c54550b /perl-install/install | |
| parent | 8738c0f8520abccd86c29a9ddb8647d265ef7322 (diff) | |
| download | drakx-ac285b11833596a5aa250f0083b7852b72374815.tar drakx-ac285b11833596a5aa250f0083b7852b72374815.tar.gz drakx-ac285b11833596a5aa250f0083b7852b72374815.tar.bz2 drakx-ac285b11833596a5aa250f0083b7852b72374815.tar.xz drakx-ac285b11833596a5aa250f0083b7852b72374815.zip | |
(update_steps_position) update icon of previous step once entering a new step
(partially reverting r243684 from 2008-07-29)
Diffstat (limited to 'perl-install/install')
| -rw-r--r-- | perl-install/install/gtk.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm index 49a1ddb17..d343eb0af 100644 --- a/perl-install/install/gtk.pm +++ b/perl-install/install/gtk.pm @@ -150,12 +150,18 @@ sub create_steps_window { sub update_steps_position { my ($o) = @_; return if !$steps{steps}; + my $last_step; foreach (@{$o->{orderedSteps}}) { exists $steps{steps}{$_} or next; if ($o->{steps}{$_}{entered} && !$o->{steps}{$_}{done}) { $steps{steps}{$_}{img}->set_from_pixbuf($steps{on}); + if ($last_step) { + $steps{steps}{$last_step}{img}->set_from_pixbuf($steps{done}); + $steps{steps}{$last_step}{text}->set_markup('<b>' . $steps{steps}{$last_step}{raw_text} . '</b>'); + } return; } + $last_step = $_; } mygtk2::flush(); #- for auto_installs which never go through the Gtk2 main loop } |