diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-01-23 19:00:19 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-01-23 19:00:19 (GMT) |
| commit | fce4c02cb3fbb3d86097d6c963866b114ba2eaca (patch) | |
| tree | b29de96a769f62f69e00dea5cbd528e2954b11ab | |
| parent | 6b5d5809c2af9d25e33f835a4228ca16f920e663 (diff) | |
| download | tk-fce4c02cb3fbb3d86097d6c963866b114ba2eaca.zip tk-fce4c02cb3fbb3d86097d6c963866b114ba2eaca.tar.gz tk-fce4c02cb3fbb3d86097d6c963866b114ba2eaca.tar.bz2 | |
Remove cross-test disruption.
| -rw-r--r-- | tests/font.test | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/font.test b/tests/font.test index 9ed24dc..2defb29 100644 --- a/tests/font.test +++ b/tests/font.test @@ -1162,6 +1162,7 @@ test font-33.1 {Tk_TextWidth procedure} { test font-34.1 {ConfigAttributesObj procedure: arguments} { # (Tcl_GetIndexFromObj() != TCL_OK) + set x {} setup list [catch {font create xyz -xyz} msg] $msg } {1 {bad option "-xyz": must be -family, -size, -weight, -slant, -underline, or -overstrike}} |