diff options
author | surles <surles@noemail.net> | 1998-06-11 14:22:12 (GMT) |
---|---|---|
committer | surles <surles@noemail.net> | 1998-06-11 14:22:12 (GMT) |
commit | 50a74d97536aa44cc53110a175f3e58c5c7938ac (patch) | |
tree | 9678b1a25f1846c698df24ab3d021a7cd922bdf1 | |
parent | c2c1cc56a5043bfaaad8d967596bf22f37bb86f3 (diff) | |
download | tk-50a74d97536aa44cc53110a175f3e58c5c7938ac.zip tk-50a74d97536aa44cc53110a175f3e58c5c7938ac.tar.gz tk-50a74d97536aa44cc53110a175f3e58c5c7938ac.tar.bz2 |
Updated broken tests
FossilOrigin-Name: c730451d7a44e187c916af78cf8fc46e42cf515e
-rw-r--r-- | tests/winButton.test | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/winButton.test b/tests/winButton.test index 7125aa5..aa7cda1 100644 --- a/tests/winButton.test +++ b/tests/winButton.test @@ -101,21 +101,21 @@ test winbutton-1.4 {TkpComputeButtonGeometry procedure} {nonPortable} { [winfo reqwidth .b2] [winfo reqheight .b2] \ [winfo reqwidth .b3] [winfo reqheight .b3] \ [winfo reqwidth .b4] [winfo reqheight .b4] -} {45 21 54 30 74 27 76 25} +} {58 24 67 33 88 30 90 28} test winbutton-1.5 {TkpComputeButtonGeometry procedure} {nonPortable} { eval destroy [winfo children .] label .l1 -text "This is a long string that will wrap around on several lines.\n\nIt also has a blank line (above)." -wraplength 1.5i -padx 0 -pady 0 pack .l1 update list [winfo reqwidth .l1] [winfo reqheight .l1] -} {142 69} +} {178 84} test winbutton-1.6 {TkpComputeButtonGeometry procedure} {nonPortable} { eval destroy [winfo children .] label .l1 -text "This is a long string without wrapping.\n\nIt also has a blank line (above)." -padx 0 -pady 0 pack .l1 update list [winfo reqwidth .l1] [winfo reqheight .l1] -} {180 43} +} {222 52} test winbutton-1.7 {TkpComputeButtonGeometry procedure} {nonPortable} { eval destroy [winfo children .] label .b1 -text Xagqpim -bd 2 -padx 0 -pady 2 -width 10 @@ -128,7 +128,7 @@ test winbutton-1.7 {TkpComputeButtonGeometry procedure} {nonPortable} { [winfo reqwidth .b2] [winfo reqheight .b2] \ [winfo reqwidth .b3] [winfo reqheight .b3] \ [winfo reqwidth .b4] [winfo reqheight .b4] -} {64 21 54 82 153 40 59 25} +} {74 24 67 97 174 46 64 28} test winbutton-1.8 {TkpComputeButtonGeometry procedure} {nonPortable} { eval destroy [winfo children .] label .b1 -text Xagqpim -bd 2 -padx 0 -pady 2 \ @@ -144,7 +144,7 @@ test winbutton-1.8 {TkpComputeButtonGeometry procedure} {nonPortable} { [winfo reqwidth .b2] [winfo reqheight .b2] \ [winfo reqwidth .b3] [winfo reqheight .b3] \ [winfo reqwidth .b4] [winfo reqheight .b4] -} {53 29 52 28 56 28 58 26} +} {66 32 65 31 69 31 71 29} test winbutton-1.9 {TkpComputeButtonGeometry procedure} { eval destroy [winfo children .] button .b2 -bitmap question -default normal |