diff options
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tkTreeColumn.c | 4 | ||||
-rw-r--r-- | generic/tkTreeStyle.c | 8 |
2 files changed, 7 insertions, 5 deletions
diff --git a/generic/tkTreeColumn.c b/generic/tkTreeColumn.c index 6d955dd..ba81d8b 100644 --- a/generic/tkTreeColumn.c +++ b/generic/tkTreeColumn.c @@ -7,7 +7,7 @@ * Copyright (c) 2002-2003 Christian Krone * Copyright (c) 2003 ActiveState Corporation * - * RCS: @(#) $Id: tkTreeColumn.c,v 1.79 2007/11/12 04:05:59 treectrl Exp $ + * RCS: @(#) $Id: tkTreeColumn.c,v 1.80 2008/01/22 00:02:34 treectrl Exp $ */ #include "tkTreeCtrl.h" @@ -5732,7 +5732,7 @@ TreeColumn_InitInterp( Tcl_DStringAppendElement(&dString, DEF_BUTTON_ACTIVE_BG_COLOR); Tcl_DStringAppendElement(&dString, ""); specPtr->defValue = ckalloc(Tcl_DStringLength(&dString) + 1); - strcpy(specPtr->defValue, Tcl_DStringValue(&dString)); + strcpy((char *)specPtr->defValue, Tcl_DStringValue(&dString)); Tcl_DStringFree(&dString); } diff --git a/generic/tkTreeStyle.c b/generic/tkTreeStyle.c index a983d08..200ead6 100644 --- a/generic/tkTreeStyle.c +++ b/generic/tkTreeStyle.c @@ -5,7 +5,7 @@ * * Copyright (c) 2002-2006 Tim Baker * - * RCS: @(#) $Id: tkTreeStyle.c,v 1.75 2007/04/21 21:34:01 treectrl Exp $ + * RCS: @(#) $Id: tkTreeStyle.c,v 1.76 2008/01/22 00:02:34 treectrl Exp $ */ #include "tkTreeCtrl.h" @@ -2733,11 +2733,13 @@ MElementLink_FreeResources( if (eLink->onion != NULL) WCFREE(eLink->onion, int, eLink->onionCount); PerStateInfo_Free(tree, &pstBoolean, &eLink->draw); - if (eLink->draw.obj != NULL) + if (eLink->draw.obj != NULL) { Tcl_DecrRefCount(eLink->draw.obj); + } PerStateInfo_Free(tree, &pstBoolean, &eLink->visible); - if (eLink->visible.obj != NULL) + if (eLink->visible.obj != NULL) { Tcl_DecrRefCount(eLink->visible.obj); + } } /* |