It's possible the lack of an update() is what is needed, but note that
setting the cursor on the toplevel (I'm assuming that's what type $wDB is)
only applies the cursor to descendants that do not have their own cursor
type set. Widgets like entry and text have their own cursor type, so you'd
need a utility procedure to manage a full widget tree.

Jeff

On Sun, Feb 15, 2015 at 12:01 PM, Mike Ignatoski <mai_king...@comcast.net>
wrote:

> I have a Tkx perl app and I'd like to change the cursor during a lengthy
> operation.
>
> Here is my code, but it doesn't work (although it doesn't generate any
> errors):
>
>          $wDB_window->configure ( -cursor=>'watch');
>          perform_lengthy_operation();
>          $wDB_window->configure ( -cursor=>'left_ptr' );
>
> Any advice is appreciated.
>
> Thanks,
>
> --
> Mike
>
> _______________________________________________
> ActivePerl mailing list
> ActivePerl@listserv.ActiveState.com
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to