summaryrefslogtreecommitdiffstats
path: root/win/tkWinEmbed.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-03 15:18:04 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-03 15:18:04 (GMT)
commitac4e07fa62e67af835459bbbc8bc4931317e696d (patch)
treee8e77e0e1e1b00f7f64f77409981101d6ed3b5c5 /win/tkWinEmbed.c
parentb9766110493b9502d12897391dab11d20acb4ad7 (diff)
downloadtk-ac4e07fa62e67af835459bbbc8bc4931317e696d.zip
tk-ac4e07fa62e67af835459bbbc8bc4931317e696d.tar.gz
tk-ac4e07fa62e67af835459bbbc8bc4931317e696d.tar.bz2
-1 -> TCL_INDEX_NONE
Diffstat (limited to 'win/tkWinEmbed.c')
-rw-r--r--win/tkWinEmbed.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/win/tkWinEmbed.c b/win/tkWinEmbed.c
index d6f7d76..dcbb1ad 100644
--- a/win/tkWinEmbed.c
+++ b/win/tkWinEmbed.c
@@ -248,7 +248,7 @@ Tk_UseWindow(
/*
if (winPtr->window != None) {
Tcl_SetObjResult(interp, Tcl_NewStringObj(
- "can't modify container after widget is created", -1));
+ "can't modify container after widget is created", TCL_INDEX_NONE));
Tcl_SetErrorCode(interp, "TK", "EMBED", "POST_CREATE", NULL);
return TCL_ERROR;
}
@@ -291,13 +291,13 @@ Tk_UseWindow(
if (id == PTR2INT(hwnd)) {
if (!SendMessageW(hwnd, TK_INFO, TK_CONTAINER_ISAVAILABLE, 0)) {
Tcl_SetObjResult(interp, Tcl_NewStringObj(
- "The container is already in use", -1));
+ "The container is already in use", TCL_INDEX_NONE));
Tcl_SetErrorCode(interp, "TK", "EMBED", "IN_USE", NULL);
return TCL_ERROR;
}
} else if (id == -PTR2INT(hwnd)) {
Tcl_SetObjResult(interp, Tcl_NewStringObj(
- "the window to use is not a Tk container", -1));
+ "the window to use is not a Tk container", TCL_INDEX_NONE));
Tcl_SetErrorCode(interp, "TK", "EMBED", "CONTAINER", NULL);
return TCL_ERROR;
} else {
@@ -313,7 +313,7 @@ Tk_UseWindow(
if (IDCANCEL == MessageBoxW(hwnd, msg, L"Tk Warning",
MB_OKCANCEL | MB_ICONWARNING)) {
Tcl_SetObjResult(interp, Tcl_NewStringObj(
- "Operation has been canceled", -1));
+ "Operation has been canceled", TCL_INDEX_NONE));
Tcl_SetErrorCode(interp, "TK", "EMBED", "CANCEL", NULL);
return TCL_ERROR;
}