summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorhobbs <hobbs>2001-07-03 06:08:33 (GMT)
committerhobbs <hobbs>2001-07-03 06:08:33 (GMT)
commitfdf19be59f62ca97ed87a3ab46969040d8182afd (patch)
treeda4b368aa960fc99095165df6d55b9382785b2d5
parentc7761841b1180a34902ee6a49a4a88c127c2d5a2 (diff)
downloadtk-fdf19be59f62ca97ed87a3ab46969040d8182afd.zip
tk-fdf19be59f62ca97ed87a3ab46969040d8182afd.tar.gz
tk-fdf19be59f62ca97ed87a3ab46969040d8182afd.tar.bz2
* unix/tkUnixScale.c (TkpDisplayScale): corrected FMR when scale
was deleted while calling its command.
-rw-r--r--unix/tkUnixScale.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/tkUnixScale.c b/unix/tkUnixScale.c
index edba2cf..8cda9cc 100644
--- a/unix/tkUnixScale.c
+++ b/unix/tkUnixScale.c
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkUnixScale.c,v 1.6 2000/04/14 08:34:49 hobbs Exp $
+ * RCS: @(#) $Id: tkUnixScale.c,v 1.7 2001/07/03 06:08:33 hobbs Exp $
*/
#include "tkScale.h"
@@ -559,7 +559,7 @@ TkpDisplayScale(clientData)
scalePtr->flags &= ~INVOKE_COMMAND;
if (scalePtr->flags & SCALE_DELETED) {
Tcl_Release((ClientData) scalePtr);
- goto done;
+ return;
}
Tcl_Release((ClientData) scalePtr);