summaryrefslogtreecommitdiffstats
path: root/library
diff options
context:
space:
mode:
authorjenglish <jenglish@flightlab.com>2013-08-15 03:56:11 (GMT)
committerjenglish <jenglish@flightlab.com>2013-08-15 03:56:11 (GMT)
commit804d674469dc08e5b32edb2e1f251d2b68711efd (patch)
treed5ab90bb3ebdce3e0222d5d381b397114b96c6c0 /library
parentcbbbe6800e56c019ed38cb3022250285b72c6419 (diff)
downloadtk-804d674469dc08e5b32edb2e1f251d2b68711efd.zip
tk-804d674469dc08e5b32edb2e1f251d2b68711efd.tar.gz
tk-804d674469dc08e5b32edb2e1f251d2b68711efd.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')
-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 --