summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2016-01-29 07:11:54 (GMT)
committerfvogel <fvogelnew1@free.fr>2016-01-29 07:11:54 (GMT)
commitc3777ebd3a31648fc5427b9536d2e304e9cbcf77 (patch)
tree5647488dc7b178fa4ee9eda28f603463296ea2b0
parentb93bf38ccbdc6c1ad92004de062574738c6a3569 (diff)
downloadtk-c3777ebd3a31648fc5427b9536d2e304e9cbcf77.zip
tk-c3777ebd3a31648fc5427b9536d2e304e9cbcf77.tar.gz
tk-c3777ebd3a31648fc5427b9536d2e304e9cbcf77.tar.bz2
Fixed test entry-6.12: merge from 8.5 didn't see that $fixed does not exist in trunk version of entry.test. Thanks to emiliano for the report.
-rw-r--r--tests/entry.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/entry.test b/tests/entry.test
index 9c30b00..4f09450 100644
--- a/tests/entry.test
+++ b/tests/entry.test
@@ -1074,7 +1074,7 @@ test entry-3.42 {EntryWidgetCmd procedure, "scan" widget command} -setup {
} -body {
.e scan a
} -cleanup {
- destroy .e
+ destroy .efixed
} -returnCodes error -result {wrong # args: should be ".e scan mark|dragto x"}
test entry-3.43 {EntryWidgetCmd procedure, "scan" widget command} -setup {
entry .e
@@ -1896,12 +1896,12 @@ test entry-6.12 {EntryComputeGeometry procedure} -constraints {
fonts
} -setup {
catch {destroy .e}
- entry .e -font $fixed -bd 2 -relief raised -width 20
+ entry .e -font {Courier -12} -bd 2 -relief raised -width 20
pack .e
} -body {
.e insert end "012\t456\t"
update
- list [.e index @81] [.e index @82] [.e index @116] [.e index @117]
+ list [.e index @80] [.e index @81] [.e index @115] [.e index @116]
} -cleanup {
destroy .e
} -result {6 7 7 8}