diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2005-01-11 09:33:50 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2005-01-11 09:33:50 +0000 |
| commit | 3e33ebb9e2d5accc27107c6c087bbb29679dcdf9 (patch) | |
| tree | fe99ea946bf3f40e87dedba7fc72cfa0861d32bb /perl-install/ugtk2.pm | |
| parent | f47e7b8711c1d81d5d0822a0d1efc8a8658fd921 (diff) | |
| download | drakx-3e33ebb9e2d5accc27107c6c087bbb29679dcdf9.tar drakx-3e33ebb9e2d5accc27107c6c087bbb29679dcdf9.tar.gz drakx-3e33ebb9e2d5accc27107c6c087bbb29679dcdf9.tar.bz2 drakx-3e33ebb9e2d5accc27107c6c087bbb29679dcdf9.tar.xz drakx-3e33ebb9e2d5accc27107c6c087bbb29679dcdf9.zip | |
the ugly gtkset_mousecursor_wait() done on destroy is not called often nowadays, and not very useful either since the wait cursor is only on the root window, and since install use isWizard, the root window is not often seen. We should at least also set the wait cursor on the $::WizardTable
Diffstat (limited to 'perl-install/ugtk2.pm')
| -rw-r--r-- | perl-install/ugtk2.pm | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index a1d3a1100..86174d77e 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -893,8 +893,6 @@ sub set_main_window_size { sub main { my ($o, $o_completed, $o_canceled) = @_; gtkset_mousecursor_normal(); - my $timeout = Glib::Timeout->add(1000, sub { gtkset_mousecursor_normal(); 1 }); - my $_b = MDK::Common::Func::before_leaving { $o->destroy; Glib::Source->remove($timeout) }; $o->show; do { @@ -911,7 +909,6 @@ sub show($) { sub destroy($) { my ($o) = @_; $o->{rwindow}->destroy if !$o->{destroyed}; - gtkset_mousecursor_wait(); flush(); } sub DESTROY { goto &destroy } |