summaryrefslogtreecommitdiffstats
path: root/generic/tkCanvas.c
diff options
context:
space:
mode:
authornijtmans <nijtmans>2008-07-23 23:24:21 (GMT)
committernijtmans <nijtmans>2008-07-23 23:24:21 (GMT)
commit535ee80de6d5c048f9a3ae7a5956b114e9a5e3f6 (patch)
tree44da117febb11bc69d260540340f018933aa8b45 /generic/tkCanvas.c
parent8daba6660a12dce054485bf87cef227741ac76a0 (diff)
downloadtk-535ee80de6d5c048f9a3ae7a5956b114e9a5e3f6.zip
tk-535ee80de6d5c048f9a3ae7a5956b114e9a5e3f6.tar.gz
tk-535ee80de6d5c048f9a3ae7a5956b114e9a5e3f6.tar.bz2
fix [2021443] inconsistant "wrong # args" messages (for Tk)
Diffstat (limited to 'generic/tkCanvas.c')
-rw-r--r--generic/tkCanvas.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/generic/tkCanvas.c b/generic/tkCanvas.c
index 79c7345..e44c6fc 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.49 2008/05/03 19:53:02 das Exp $
+ * RCS: @(#) $Id: tkCanvas.c,v 1.50 2008/07/23 23:24:21 nijtmans Exp $
*/
/* #define USE_OLD_TAG_SEARCH 1 */
@@ -388,7 +388,7 @@ Tk_CanvasObjCmd(
}
if (argc < 2) {
- Tcl_WrongNumArgs(interp, 1, argv, "pathName ?options?");
+ Tcl_WrongNumArgs(interp, 1, argv, "pathName ?-option value ...?");
return TCL_ERROR;
}
@@ -564,7 +564,7 @@ CanvasWidgetCmd(
};
if (objc < 2) {
- Tcl_WrongNumArgs(interp, 1, objv, "option ?arg arg ...?");
+ Tcl_WrongNumArgs(interp, 1, objv, "option ?arg ...?");
return TCL_ERROR;
}
if (Tcl_GetIndexFromObj(interp, objv[1], optionStrings, "option", 0,
@@ -577,7 +577,7 @@ CanvasWidgetCmd(
switch ((enum options) index) {
case CANV_ADDTAG:
if (objc < 4) {
- Tcl_WrongNumArgs(interp, 2, objv, "tag searchCommand ?arg arg ...?");
+ Tcl_WrongNumArgs(interp, 2, objv, "tag searchCommand ?arg ...?");
result = TCL_ERROR;
goto done;
}
@@ -926,7 +926,7 @@ CanvasWidgetCmd(
int length;
if (objc < 3) {
- Tcl_WrongNumArgs(interp, 2, objv, "type coords ?arg arg ...?");
+ Tcl_WrongNumArgs(interp, 2, objv, "type coords ?arg ...?");
result = TCL_ERROR;
goto done;
}
@@ -960,7 +960,7 @@ CanvasWidgetCmd(
/*
* Allow more specific error return.
*/
- Tcl_WrongNumArgs(interp, 3, objv, "coords ?arg arg ...?");
+ Tcl_WrongNumArgs(interp, 3, objv, "coords ?arg ...?");
result = TCL_ERROR;
goto done;
}
@@ -1158,7 +1158,7 @@ CanvasWidgetCmd(
}
case CANV_FIND:
if (objc < 3) {
- Tcl_WrongNumArgs(interp, 2, objv, "searchCommand ?arg arg ...?");
+ Tcl_WrongNumArgs(interp, 2, objv, "searchCommand ?arg ...?");
result = TCL_ERROR;
goto done;
}
@@ -1355,7 +1355,7 @@ CanvasWidgetCmd(
break;
case CANV_ITEMCONFIGURE:
if (objc < 3) {
- Tcl_WrongNumArgs(interp, 2, objv, "tagOrId ?option value ...?");
+ Tcl_WrongNumArgs(interp, 2, objv, "tagOrId ?-option value ...?");
result = TCL_ERROR;
goto done;
}