Tk Source Code

Check-in [24b987ca]
Login
Bounty program for improvements to Tcl and certain Tcl packages.

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Fix textWind.test: make sure that the test window is mapped before running tests (needed on macOS).
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-6-branch
Files: files | file ages | folders
SHA3-256: 24b987cafa8c5f12495c988414d3de1b6e8322f6e5cfcff04281886b7a716888
User & Date: culler 2019-04-25 18:16:49
Original Comment: Fix textDisp.test: make sure that the test window is mapped before running tests (needed on macOS).
References
2019-04-29
03:14 Ticket [d1989fb7] Aqua: Empty window appears after `package require Tk` status still Open with 5 other changes artifact: 0f0ead8e user: chrstphrchvz
2019-04-28
19:08 New ticket [d1989fb7]. artifact: 559c59c1 user: chrstphrchvz
Context
2019-04-28
16:17
Fix [6286fda787]: unix: checkbutton -selectcolor not restored properly when changed in -command. Patch by ralfixx check-in: f916116a user: fvogel tags: core-8-6-branch
2019-04-25
18:17
Fix textWind.test: make sure that the test window is mapped before running tests (needed on macOS). check-in: 62d4693e user: culler tags: trunk
18:16
Fix textWind.test: make sure that the test window is mapped before running tests (needed on macOS). check-in: 24b987ca user: culler tags: core-8-6-branch
2019-04-24
17:35
Fix bug [1001070]: make labels use -highlightbackground check-in: 6a50c7c3 user: culler tags: core-8-6-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to tests/textWind.test.

34
35
36
37
38
39
40





41
42
43
44
45
46
47
# The statements below reset the main window;  it's needed if the window
# manager is mwm to make mwm forget about a previous minimum size setting.

wm withdraw .
wm minsize . 1 1
wm positionfrom . user
wm deiconify .






set bw [.t cget -borderwidth]
set px [.t cget -padx]
set py [.t cget -pady]
set hlth [.t cget -highlightthickness]
set padx [expr {$bw+$px+$hlth}]
set pady [expr {$bw+$py+$hlth}]






>
>
>
>
>







34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
# The statements below reset the main window;  it's needed if the window
# manager is mwm to make mwm forget about a previous minimum size setting.

wm withdraw .
wm minsize . 1 1
wm positionfrom . user
wm deiconify .

# This update is needed on MacOS to make sure that the window is mapped
# when the tests begin.

update 

set bw [.t cget -borderwidth]
set px [.t cget -padx]
set py [.t cget -pady]
set hlth [.t cget -highlightthickness]
set padx [expr {$bw+$px+$hlth}]
set pady [expr {$bw+$py+$hlth}]