Adam Williamson <[EMAIL PROTECTED]> writes:

> On Tue, 2002-08-20 at 22:52, Austin Acton wrote:
> > When I close rpmdrake (normal exit), my pointer in Gnome2 remains as a
> > watch-face (aka wait).
> > Just some more info in case this helps (stdout):
> 
> It's a bloody annoying bug that seems to get into everything ever
> written by someone at Mandrake but not into any other bit of software
> i've ever used. They know how to patch it really, I think they're just
> teasing us. =).

well I have been looking for a nice solution for this, but didn't find
one.

but you teasing me has made me try again... and this time I have a
solution, not really nice, but at least non code intrusive.

FYI, here it is:


sub destroy($) {
    my ($o) = @_;
    $o->{rwindow} and $o->{rwindow}->destroy;
    gtkset_mousecursor_wait();
    flush();
}

replaced with

sub destroy($) {
    my ($o) = @_;
    return if $^S & 4;
        #- program is going to leave
        #- don't do anything, especially don't set the waiting mouse cursor
        #- another thing is that calling flush() at this moment causes segfault
        #- so don't do it and no more segfault :)
        #- (now, if someone finds out what this 4 is about... but you cares, it works 
:)

    $o->{rwindow} and $o->{rwindow}->destroy;
    gtkset_mousecursor_wait();
    flush();
}


my hope is that it will still work with next version of perl :-/

Reply via email to