diff options
| author | fvogel <fvogelnew1@free.fr> | 2016-02-09 21:37:33 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2016-02-09 21:37:33 (GMT) |
| commit | e108f0116e3154bacd641f8f85529512a2b9046f (patch) | |
| tree | 2f62e87a123537201bd9b027fa133da711caf9df | |
| parent | 196fc0f4ea980dfeed790a1c2f5e4cae7077c0b4 (diff) | |
| download | tk-e108f0116e3154bacd641f8f85529512a2b9046f.zip tk-e108f0116e3154bacd641f8f85529512a2b9046f.tar.gz tk-e108f0116e3154bacd641f8f85529512a2b9046f.tar.bz2 | |
-selectfgstipple tag configuration option: tests
| -rw-r--r-- | tests/textTag.test | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/tests/textTag.test b/tests/textTag.test index 63081f3..ede86fd 100644 --- a/tests/textTag.test +++ b/tests/textTag.test @@ -251,12 +251,23 @@ test textTag-1.25d {configuration options} -body { .t tag configure x -selectbgstipple [lindex [.t tag configure x -selectbgstipple] 3] } -returnCodes error -result {bitmap "badStipple" not defined} test textTag-1.25e {tag configuration options} -body { + .t tag configure x -selectfgstipple gray50 + .t tag cget x -selectfgstipple +} -cleanup { + .t tag configure x -selectfgstipple [lindex [.t tag configure x -selectfgstipple] 3] +} -result {gray50} +test textTag-1.25f {configuration options} -body { + .t tag configure x -selectfgstipple badStipple +} -cleanup { + .t tag configure x -selectfgstipple [lindex [.t tag configure x -selectfgstipple] 3] +} -returnCodes error -result {bitmap "badStipple" not defined} +test textTag-1.25g {tag configuration options} -body { .t tag configure x -selectforeground #012345 .t tag cget x -selectforeground } -cleanup { .t tag configure x -selectforeground [lindex [.t tag configure x -selectforeground] 3] } -result {#012345} -test textTag-1.25f {configuration options} -body { +test textTag-1.25h {configuration options} -body { .t tag configure x -selectforeground non-existent } -cleanup { .t tag configure x -selectforeground [lindex [.t tag configure x -selectforeground] 3] |