I've got a situation where...if I close a window by clicking the top right "X" button with with the mouse Tkx::tkwait works as expected and lets the program go past it. However if I use a key handler to trap Escape and issue the line Tkx::destroy($self->{win}); or $self->{win}->g_destroy; I seem to be in an endless loop...ending Dooneevent which I think is in the event loop but nothing passes tkwait. What's worse is the little test program I wrote to isolate the problem works well with either close method mouse or destroy statement so...it's useless in shedding light on the problem. BTW both of the destroy lines DO close the window so I'm not sure why tkwait doesn't see this and let the program flow by i.e. I printed the name of the window out just before tkwait so tkwait does "see" the window. At this stage any suggestions would be welcome. If necessary I'll try to build a more structurally representative model of my problem i.e. complete with skeleton object containing the window and use hierarchy. I suppose what's throwing me is why g_destroy works in some cases and not others re causing tkwait to let the program pass by.

In reply to Tkx::__tkwait nightmare by previous

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.