diff options
| author | dgp <dgp@noemail.net> | 2013-02-05 17:44:34 (GMT) |
|---|---|---|
| committer | dgp <dgp@noemail.net> | 2013-02-05 17:44:34 (GMT) |
| commit | 5e1e93f676c64b87c0a873d95ca855b3feedd2ee (patch) | |
| tree | cf24d154f023ca48a7ede5738ca161c7ada9f153 /tests/font.test | |
| parent | e232502b3651867f81404cd9379e4e2c5c7495ef (diff) | |
| download | tk-5e1e93f676c64b87c0a873d95ca855b3feedd2ee.zip tk-5e1e93f676c64b87c0a873d95ca855b3feedd2ee.tar.gz tk-5e1e93f676c64b87c0a873d95ca855b3feedd2ee.tar.bz2 | |
Restore failing tests to passing.
FossilOrigin-Name: b2677cc770123a484d20beb3f1355e7c13670114
Diffstat (limited to 'tests/font.test')
| -rw-r--r-- | tests/font.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/font.test b/tests/font.test index 33986af..33e411a 100644 --- a/tests/font.test +++ b/tests/font.test @@ -798,11 +798,11 @@ test font-18.1 {FreeFontObjProc} -constraints testfont -setup { destroy .b1 set result {} } -body { - set x [format {Courier 12}] + set x [join {Courier 12} { }] button .b1 -font $x - set y [format {Courier 12}] + set y [join {Courier 12} { }] .b1 configure -font $y - set z [format {Courier 12}] + set z [join {Courier 12} { }] .b1 configure -font $z lappend result [testfont counts {Courier 12}] set x red |