summaryrefslogtreecommitdiffstats
path: root/generic/ttk/ttkProgress.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-08-14 13:07:38 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-08-14 13:07:38 (GMT)
commitc9bb96468f1ed1e24b9aaa8df6f69cbba9665680 (patch)
tree22b5c91828f6941dc0bb1e3773fa93775a329902 /generic/ttk/ttkProgress.c
parent00c61e611d0efe1b62775b665e0157345c9ad7b5 (diff)
downloadtk-c9bb96468f1ed1e24b9aaa8df6f69cbba9665680.zip
tk-c9bb96468f1ed1e24b9aaa8df6f69cbba9665680.tar.gz
tk-c9bb96468f1ed1e24b9aaa8df6f69cbba9665680.tar.bz2
tkConfig.c: protect usage of internalPtr when offset is TCL_INDEX_NONE. Backported from revised_text.
Various minor changes in error-messages, also inspired by revised_text
Diffstat (limited to 'generic/ttk/ttkProgress.c')
-rw-r--r--generic/ttk/ttkProgress.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/ttk/ttkProgress.c b/generic/ttk/ttkProgress.c
index 6e5875e..505748b 100644
--- a/generic/ttk/ttkProgress.c
+++ b/generic/ttk/ttkProgress.c
@@ -137,7 +137,7 @@ static void AnimateProgressProc(ClientData clientData)
if (pb->progress.maxPhase)
phase %= pb->progress.maxPhase;
Tcl_DecrRefCount(pb->progress.phaseObj);
- pb->progress.phaseObj = Tcl_NewIntObj(phase);
+ pb->progress.phaseObj = Tcl_NewWideIntObj(phase);
Tcl_IncrRefCount(pb->progress.phaseObj);
/*