diff options
author | fvogel <fvogelnew1@free.fr> | 2019-04-22 22:09:50 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2019-04-22 22:09:50 (GMT) |
commit | f43a38c216438267b70e6141ecb1b6fd5194fd9c (patch) | |
tree | f883240827e0914ae114ae04e425442c33e23cbb /generic/ttk | |
parent | e2d80191d706d8c9efed09c06b55ba96f48fdc7f (diff) | |
download | tk-f43a38c216438267b70e6141ecb1b6fd5194fd9c.zip tk-f43a38c216438267b70e6141ecb1b6fd5194fd9c.tar.gz tk-f43a38c216438267b70e6141ecb1b6fd5194fd9c.tar.bz2 |
Fix [2513186fff] and [f9343d8f72]: ttk::entry xview sub-command forces use of update idletasks. Thanks to cjmcdonald.
Diffstat (limited to 'generic/ttk')
-rw-r--r-- | generic/ttk/ttkEntry.c | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/generic/ttk/ttkEntry.c b/generic/ttk/ttkEntry.c index ebc485e..0f1707b 100644 --- a/generic/ttk/ttkEntry.c +++ b/generic/ttk/ttkEntry.c @@ -1651,6 +1651,13 @@ static int EntryXViewCommand( void *recordPtr, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]) { Entry *entryPtr = recordPtr; + + /* + * Ensure that the scroll info is up-to-date before a scrolling command. + */ + + EntryDoLayout(recordPtr); + if (objc == 3) { int newFirst; if (EntryIndex(interp, entryPtr, objv[2], &newFirst) != TCL_OK) { |