diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-01-23 21:09:17 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-01-23 21:09:17 (GMT) |
| commit | ff8b5479baab369fa6163bf42b9928dcb482261f (patch) | |
| tree | 23038658da225431345cd584e9449094f7083e35 /tests/font.test | |
| parent | 10be4df79f97808bfedd7ac58d6e44e04a221e65 (diff) | |
| parent | aafc31a89b188a589cc256a1f62bb80b2f053a2b (diff) | |
| download | tk-ff8b5479baab369fa6163bf42b9928dcb482261f.zip tk-ff8b5479baab369fa6163bf42b9928dcb482261f.tar.gz tk-ff8b5479baab369fa6163bf42b9928dcb482261f.tar.bz2 | |
merge 8.5
Diffstat (limited to 'tests/font.test')
| -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}} |