diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-06-14 10:02:12 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-06-14 10:02:12 +0000 |
commit | 0584587cec2231fb3d8fdef25f3ff150603944d8 (patch) | |
tree | cb71f83f67d1b914fec6e134ee321ddb90908f3a /perl-install/ugtk2.pm | |
parent | 213fcb6c98cc4dc60ae6348e0cac38a394d05757 (diff) | |
download | drakx-backup-do-not-use-0584587cec2231fb3d8fdef25f3ff150603944d8.tar drakx-backup-do-not-use-0584587cec2231fb3d8fdef25f3ff150603944d8.tar.gz drakx-backup-do-not-use-0584587cec2231fb3d8fdef25f3ff150603944d8.tar.bz2 drakx-backup-do-not-use-0584587cec2231fb3d8fdef25f3ff150603944d8.tar.xz drakx-backup-do-not-use-0584587cec2231fb3d8fdef25f3ff150603944d8.zip |
merge fixes from HEAD
Diffstat (limited to 'perl-install/ugtk2.pm')
-rw-r--r-- | perl-install/ugtk2.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 6d5bb165f..dffd5d674 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -970,7 +970,7 @@ 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 { Glib::Source->remove($timeout) }; + my $_b = MDK::Common::Func::before_leaving { $o->destroy; Glib::Source->remove($timeout) }; $o->show; do { |