From 16a44a4ac1d6c651b55dbe11b537dfdb33eb6890 Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Thu, 18 Aug 2005 12:58:42 +0000 Subject: Display a wait cursor on the whole window when a wait message is displayed on the status bar. --- rpmdrake.pm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'rpmdrake.pm') diff --git a/rpmdrake.pm b/rpmdrake.pm index 69245c8d..a818b801 100644 --- a/rpmdrake.pm +++ b/rpmdrake.pm @@ -343,6 +343,7 @@ sub statusbar_msg { my ($msg) = @_; #- always use the same context description for now my $cx = $::statusbar->get_context_id("foo"); + $::w and $::w->{rwindow} and gtkset_mousecursor_wait($::w->{rwindow}->window); #- returns a msg_id to be passed optionnally to statusbar_msg_remove $::statusbar->push($cx, $msg); } @@ -358,6 +359,7 @@ sub statusbar_msg_remove { } else { $::statusbar->pop($cx); } + $::w and $::w->{rwindow} and gtkset_mousecursor_normal($::w->{rwindow}->window); } sub slow_func_statusbar ($$&) { -- cgit v1.2.1