summaryrefslogtreecommitdiffstats
path: root/generic/ttk/ttkEntry.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-02-26 10:13:04 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-02-26 10:13:04 (GMT)
commit4d4bf9a051a30dad87a2b518e2641851b702dd3c (patch)
tree1566ff74caf52d519b52c4e823f7ab28ca15b54e /generic/ttk/ttkEntry.c
parent632866365dc6bc82d38d23624c3ca69966bd8aaa (diff)
parent22438af8abfb0b3cc6f608bd906d804bae7cc4de (diff)
downloadtk-4d4bf9a051a30dad87a2b518e2641851b702dd3c.zip
tk-4d4bf9a051a30dad87a2b518e2641851b702dd3c.tar.gz
tk-4d4bf9a051a30dad87a2b518e2641851b702dd3c.tar.bz2
Merge trunk
Diffstat (limited to 'generic/ttk/ttkEntry.c')
-rw-r--r--generic/ttk/ttkEntry.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/ttk/ttkEntry.c b/generic/ttk/ttkEntry.c
index 92b980a..cb5435a 100644
--- a/generic/ttk/ttkEntry.c
+++ b/generic/ttk/ttkEntry.c
@@ -1556,7 +1556,7 @@ EntryIndexCommand(
if (EntryIndex(interp, entryPtr, objv[2], &index) != TCL_OK) {
return TCL_ERROR;
}
- Tcl_SetObjResult(interp, Tcl_NewIntObj(index));
+ Tcl_SetObjResult(interp, Tcl_NewWideIntObj(index));
return TCL_OK;
}
@@ -1856,7 +1856,7 @@ static int ComboboxCurrentCommand(
}
}
cbPtr->combobox.currentIndex = currentIndex;
- Tcl_SetObjResult(interp, Tcl_NewIntObj(currentIndex));
+ Tcl_SetObjResult(interp, Tcl_NewWideIntObj(currentIndex));
return TCL_OK;
} else if (objc == 3) {
int result, index;