diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2005-02-07 10:32:46 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2005-02-07 10:32:46 (GMT) |
| commit | 0339fb570a221a5c692040884f1c7ffae051c5cf (patch) | |
| tree | 3d8d06c6ad728fac99dfc170824963aba5bc84b5 /generic/tkCanvas.c | |
| parent | 784080f7bd72add6b63d481eb2ad1c0a7fe2be60 (diff) | |
| download | tk-0339fb570a221a5c692040884f1c7ffae051c5cf.zip tk-0339fb570a221a5c692040884f1c7ffae051c5cf.tar.gz tk-0339fb570a221a5c692040884f1c7ffae051c5cf.tar.bz2 | |
Fix silly mistake. :^}
Diffstat (limited to 'generic/tkCanvas.c')
| -rw-r--r-- | generic/tkCanvas.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkCanvas.c b/generic/tkCanvas.c index d3ec308..65f6816 100644 --- a/generic/tkCanvas.c +++ b/generic/tkCanvas.c @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkCanvas.c,v 1.33 2005/02/03 13:46:43 dkf Exp $ + * RCS: @(#) $Id: tkCanvas.c,v 1.34 2005/02/07 10:33:09 dkf Exp $ */ /* #define USE_OLD_TAG_SEARCH 1 */ @@ -953,12 +953,12 @@ CanvasWidgetCmd(clientData, interp, objc, objv) } arg = Tcl_GetStringFromObj(objv[2], (int *) &length); c = arg[0]; - Tcl_MutexLock(&typeListPtr); + Tcl_MutexLock(&typeListMutex); for (typePtr = typeList; typePtr != NULL; typePtr = typePtr->nextPtr) { if ((c == typePtr->name[0]) && (strncmp(arg, typePtr->name, length) == 0)) { if (matchPtr != NULL) { - Tcl_MutexUnlock(&typeListPtr); + Tcl_MutexUnlock(&typeListMutex); badType: Tcl_AppendResult(interp, "unknown or ambiguous item type \"", @@ -974,7 +974,7 @@ CanvasWidgetCmd(clientData, interp, objc, objv) * the matched item type that are potentially modified by * other threads. */ - Tcl_MutexUnlock(&typeListPtr); + Tcl_MutexUnlock(&typeListMutex); if (matchPtr == NULL) { goto badType; } |