un-binding events perl tk

pashanoid has asked for the wisdom of the Perl Monks concerning the following question:

Good time of day to you all! I've been trying to un-bind an event for over 24 hours now. In my script I have an <ButtonPress> event, which starts to follow the cursor and draws a rectangle. In that same window I'm trying to place an Optionmenu. However, this Optionmenu seems to capture the <ButtonPress> binding and no matter how hard I try It's unable to 'destroy' the window it was in after I select something from the Optionmenu. Should I post an example?

Comment on un-binding events perl tk

Replies are listed 'Best First'.
Re: un-binding events perl tk by zentara (Cardinal) on Aug 26, 2011 at 10:05 UTC
Should I post an example? Always. :-) The easiest way would be to change the <ButtonPress> event which triggers your rectangle, to something involving a key too, like <Shift Buttonpress>. Also see How do I suppress handlers when binding callbacks in Tk I'm not really a human, but I play one on earth. Old Perl Programmer Haiku ................... flash japh	[reply]
Re: un-binding events perl tk by locked_user sundialsvc4 (Abbot) on Aug 26, 2011 at 13:46 UTC
Yes, please do post a “short and to-the-point” code example. Use an enclosing tag as described in “Markup in the Monastery” so that the source-code does not appear in-line but can be expanded and viewed upon request.