summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2004-06-15 15:37:31 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2004-06-15 15:37:31 (GMT)
commit30a681fedf56e7ae0baaeccbc32a9696d788b12f (patch)
tree2750c749bfe93e3f1c29affa46564c14b095cdd9
parent729bfa91af53f43e23f2b9afe8dfd40460846ccb (diff)
downloadtk-30a681fedf56e7ae0baaeccbc32a9696d788b12f.zip
tk-30a681fedf56e7ae0baaeccbc32a9696d788b12f.tar.gz
tk-30a681fedf56e7ae0baaeccbc32a9696d788b12f.tar.bz2
D'oh!
-rw-r--r--generic/tkCanvas.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tkCanvas.c b/generic/tkCanvas.c
index 7e7b4f7..2229375 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.29 2004/06/15 15:28:23 dkf Exp $
+ * RCS: @(#) $Id: tkCanvas.c,v 1.30 2004/06/15 15:37:31 dkf Exp $
*/
/* #define USE_OLD_TAG_SEARCH 1 */
@@ -360,7 +360,7 @@ static Tk_ClassProcs canvasClass = {
if ((result=TagSearchScan(canvasPtr,(objPtr),(searchPtrPtr))) != TCL_OK){ \
errorExitClause; \
} \
- itemPtr = TagSearchFirst(searchPtr);
+ itemPtr = TagSearchFirst(*(searchPtrPtr));
#define FOR_EVERY_CANVAS_ITEM_MATCHING(objPtr,searchPtrPtr,errorExitClause) \
if ((result=TagSearchScan(canvasPtr,(objPtr),(searchPtrPtr))) != TCL_OK){ \
errorExitClause; \