summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
Diffstat (limited to 'generic')
-rw-r--r--generic/tkPack.c4
-rw-r--r--generic/tkUtil.c2
2 files changed, 3 insertions, 3 deletions
diff --git a/generic/tkPack.c b/generic/tkPack.c
index d91fda7..134b61f 100644
--- a/generic/tkPack.c
+++ b/generic/tkPack.c
@@ -1114,7 +1114,7 @@ PackAfter(
for ( ; objc > 0; objc -= 2, objv += 2, prevPtr = packPtr) {
if (objc < 2) {
Tcl_SetObjResult(interp, Tcl_ObjPrintf(
- "wrong # args: \"%s\" should be followed by options",
+ "wrong # args: window \"%s\" should be followed by options",
Tcl_GetString(objv[0])));
Tcl_SetErrorCode(interp, "TCL", "WRONGARGS", NULL);
return TCL_ERROR;
@@ -1200,7 +1200,7 @@ PackAfter(
if (optionCount < (index+2)) {
missingPad:
Tcl_SetObjResult(interp, Tcl_ObjPrintf(
- "wrong # args: window \"%s\" option must be"
+ "wrong # args: \"%s\" option must be"
" followed by screen distance", curOpt));
Tcl_SetErrorCode(interp, "TK", "OLDPACK", "BAD_PARAMETER",
NULL);
diff --git a/generic/tkUtil.c b/generic/tkUtil.c
index a8d2884..385d1cb 100644
--- a/generic/tkUtil.c
+++ b/generic/tkUtil.c
@@ -998,7 +998,7 @@ TkFindStateNumObj(
Tcl_GetString(optionPtr), key, mPtr->strKey);
for (mPtr++; mPtr->strKey != NULL; mPtr++) {
Tcl_AppendPrintfToObj(msgObj, ",%s %s",
- ((mPtr[1].strKey != NULL) ? "" : "or "), mPtr->strKey);
+ ((mPtr[1].strKey != NULL) ? "" : " or"), mPtr->strKey);
}
Tcl_SetObjResult(interp, msgObj);
Tcl_SetErrorCode(interp, "TK", "LOOKUP", Tcl_GetString(optionPtr),