summaryrefslogtreecommitdiffstats
path: root/library/ttk/progress.tcl
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-08-26 11:00:13 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-08-26 11:00:13 (GMT)
commit3d9172ad682a1cfffaf9f55793a947ff05c78e57 (patch)
treece1b9b052466298a15cc19568a0afdff5cfd3ffc /library/ttk/progress.tcl
parentac926c8962ff29dc01aaf033abe31036311c5d28 (diff)
downloadtk-3d9172ad682a1cfffaf9f55793a947ff05c78e57.zip
tk-3d9172ad682a1cfffaf9f55793a947ff05c78e57.tar.gz
tk-3d9172ad682a1cfffaf9f55793a947ff05c78e57.tar.bz2
Bug [c597acdab3]: Call [$pb step] in tail position in ttk::progressbar::Autoincrement, so that the widget is in a consistent state when any write traces on the linked -variable are fired
Diffstat (limited to 'library/ttk/progress.tcl')
-rw-r--r--library/ttk/progress.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/library/ttk/progress.tcl b/library/ttk/progress.tcl
index b6e2ffb..34dce72 100644
--- a/library/ttk/progress.tcl
+++ b/library/ttk/progress.tcl
@@ -18,10 +18,10 @@ proc ttk::progressbar::Autoincrement {pb steptime stepsize} {
return
}
- $pb step $stepsize
-
set Timers($pb) [after $steptime \
[list ttk::progressbar::Autoincrement $pb $steptime $stepsize] ]
+
+ $pb step $stepsize
}
# ttk::progressbar::start --