diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2004-06-15 15:37:31 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2004-06-15 15:37:31 (GMT) |
| commit | 117a07e6f2c50a2356b358b897b99baf2359c9df (patch) | |
| tree | 2750c749bfe93e3f1c29affa46564c14b095cdd9 /generic | |
| parent | 7f218dc8141ab67c4a3f7ce1e65fd3dac3cf7efd (diff) | |
| download | tk-117a07e6f2c50a2356b358b897b99baf2359c9df.zip tk-117a07e6f2c50a2356b358b897b99baf2359c9df.tar.gz tk-117a07e6f2c50a2356b358b897b99baf2359c9df.tar.bz2 | |
D'oh!
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tkCanvas.c | 4 |
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; \ |