diff options
author | hobbs <hobbs> | 2003-11-12 00:07:42 (GMT) |
---|---|---|
committer | hobbs <hobbs> | 2003-11-12 00:07:42 (GMT) |
commit | c63dbc66c4b4b2d3341d80e51610cac95d1a363c (patch) | |
tree | d24a6858b1fe0f26e48f8ddcb8ebeea5765656f7 | |
parent | a5ddfe3c7b7b3c31b520e8e571352369ea2cef6c (diff) | |
download | tk-c63dbc66c4b4b2d3341d80e51610cac95d1a363c.zip tk-c63dbc66c4b4b2d3341d80e51610cac95d1a363c.tar.gz tk-c63dbc66c4b4b2d3341d80e51610cac95d1a363c.tar.bz2 |
* generic/tkButton.c (ConfigureButton): abort option processing if
the button was deleted. [Bug #824479]
-rw-r--r-- | ChangeLog | 9 | ||||
-rw-r--r-- | generic/tkButton.c | 9 |
2 files changed, 17 insertions, 1 deletions
@@ -1,10 +1,19 @@ 2003-11-11 Jeff Hobbs <jeffh@ActiveState.com> + * generic/tkButton.c (ConfigureButton): abort option processing if + the button was deleted. [Bug #824479] + + * generic/tkMenuDraw.c (TkPostSubmenu): add {} around menu name in + case it has spaces when calling Tcl_VarEval. This is a hack until + this is rewritten for proper Tcl_Obj handling. [Bug #723856] + * library/tkfbox.tcl (::tk::dialog::file::Update): optimize the dir/files list separation by using the -tails, -directory and -type option of 'glob'. Also passes the glob the -filetypes filters instead of calling string match over each file. [Patch #833819] + (::tk::dialog::file::ActivateEnt): allow typing filename into + entry when tk_getOpenFile -multiple 1 is specified. [Bug #788069] * generic/tkListbox.c (ListboxDeleteSubCmd, ListboxListVarProc): free itemconfig data when removing it from table. [Bug #836483] diff --git a/generic/tkButton.c b/generic/tkButton.c index 640921f..bfd5010 100644 --- a/generic/tkButton.c +++ b/generic/tkButton.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkButton.c,v 1.21 2003/04/26 02:59:20 hobbs Exp $ + * RCS: @(#) $Id: tkButton.c,v 1.22 2003/11/12 00:07:42 hobbs Exp $ */ #include "tkButton.h" @@ -1080,6 +1080,13 @@ ConfigureButton(interp, butPtr, objc, objv) Tk_RestoreSavedOptions(&savedOptions); } + if ((butPtr->flags & BUTTON_DELETED)) { + /* + * Somehow button was deleted - just abort now. [Bug #824479] + */ + return TCL_ERROR; + } + /* * A few options need special processing, such as setting the * background from a 3-D border, or filling in complicated |