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