diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-02-26 10:13:04 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-02-26 10:13:04 (GMT) |
commit | 4d4bf9a051a30dad87a2b518e2641851b702dd3c (patch) | |
tree | 1566ff74caf52d519b52c4e823f7ab28ca15b54e /generic/ttk/ttkEntry.c | |
parent | 632866365dc6bc82d38d23624c3ca69966bd8aaa (diff) | |
parent | 22438af8abfb0b3cc6f608bd906d804bae7cc4de (diff) | |
download | tk-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.c | 4 |
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; |