summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rw-r--r--generic/tkCanvas.c1
2 files changed, 6 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index bed9e4b..d39cd72 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2011-11-14 Alexandre Ferrieux <ferrieux@users.sourceforge.net>
+
+ * generic/tkCanvas.c: [Bug 3437816]: Missing TCL_ERROR return
+ in [canvas lower].
+
2011-11-08 Reinhard Max <max@suse.de>
* unix/Makefile.in: Add square to DEMOPROGS. It contains a shebang
diff --git a/generic/tkCanvas.c b/generic/tkCanvas.c
index f244aad..14d8261 100644
--- a/generic/tkCanvas.c
+++ b/generic/tkCanvas.c
@@ -1649,6 +1649,7 @@ CanvasWidgetCmd(
if (itemPtr == NULL) {
Tcl_AppendResult(interp, "tag \"", Tcl_GetString(objv[3]),
"\" doesn't match any items", NULL);
+ result = TCL_ERROR;
goto done;
}
itemPtr = itemPtr->prevPtr;