Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Fix [ce6b428620] (in Tcl repository, see https://core.tcl-lang.org/tcl/tktview/ce6b428620dd89bc46786654e3aa1d62d74d3fc8): <<Increment>> event is endlessly triggered once messagebox closes |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | bug-ce6b428620 |
| Files: | files | file ages | folders |
| SHA3-256: |
fb9a3632373e63e3b7e17235219abc7d |
| User & Date: | fvogel 2022-02-18 21:19:56.110 |
| Original Comment: | Fix [ce6b428620]: <<Increment>> event is endlessly triggered once messagebox closes |
Context
|
2022-02-25
| ||
| 23:23 | Fix [ce6b428620] (from Tcl repository, see https://core.tcl-lang.org/tcl/tktview/ce6b428620dd89bc46786654e3aa1d62d74d3fc8): <<Increment>> event is endlessly triggered once messagebox closes. check-in: e54575be user: fvogel tags: core-8-6-branch | |
|
2022-02-18
| ||
| 21:19 | Fix [ce6b428620] (in Tcl repository, see https://core.tcl-lang.org/tcl/tktview/ce6b428620dd89bc46786654e3aa1d62d74d3fc8): <<Increment>> event is endlessly triggered once messagebox closes Closed-Leaf check-in: fb9a3632 user: fvogel tags: bug-ce6b428620 | |
|
2022-02-17
| ||
| 22:25 | Make tkWin32Dll.c compile with the aarch64-w64-mingw32-clang compiler check-in: 66dc2db2 user: jan.nijtmans tags: core-8-6-branch | |
Changes
Changes to library/ttk/utils.tcl.
| ︙ | ︙ | |||
232 233 234 235 236 237 238 |
# Begin auto-repeat.
#
proc ttk::Repeatedly {args} {
variable Repeat
after cancel $Repeat(timer)
set script [uplevel 1 [list namespace code $args]]
set Repeat(script) $script
| < > < > | 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 |
# Begin auto-repeat.
#
proc ttk::Repeatedly {args} {
variable Repeat
after cancel $Repeat(timer)
set script [uplevel 1 [list namespace code $args]]
set Repeat(script) $script
set Repeat(timer) [after $Repeat(delay) ttk::Repeat]
uplevel #0 $script
}
## Repeat --
# Continue auto-repeat
#
proc ttk::Repeat {} {
variable Repeat
set Repeat(timer) [after $Repeat(interval) ttk::Repeat]
uplevel #0 $Repeat(script)
}
## ttk::CancelRepeat --
# Halt auto-repeat.
#
proc ttk::CancelRepeat {} {
variable Repeat
|
| ︙ | ︙ |