diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-08-26 11:00:13 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-08-26 11:00:13 (GMT) |
| commit | 3d9172ad682a1cfffaf9f55793a947ff05c78e57 (patch) | |
| tree | ce1b9b052466298a15cc19568a0afdff5cfd3ffc /library/ttk/progress.tcl | |
| parent | ac926c8962ff29dc01aaf033abe31036311c5d28 (diff) | |
| download | tk-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.tcl | 4 |
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 -- |