diff options
author | fvogel <fvogelnew1@free.fr> | 2018-04-15 21:18:30 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2018-04-15 21:18:30 (GMT) |
commit | 22dde55e50b064132e67a1f9206786d9ab2c3869 (patch) | |
tree | 8dc11aa74ccbd2342410ff356c5656c0ed254f2e /tests | |
parent | 510d1dc62777e065bb5e646f96ffec7411f78d94 (diff) | |
download | tk-22dde55e50b064132e67a1f9206786d9ab2c3869.zip tk-22dde55e50b064132e67a1f9206786d9ab2c3869.tar.gz tk-22dde55e50b064132e67a1f9206786d9ab2c3869.tar.bz2 |
Fix test entry-10.1 in ttk/entry.test so that ttk widgets are tested, and add testing of -placeholderforeground for ttk::entry.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/ttk/entry.test | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/tests/ttk/entry.test b/tests/ttk/entry.test index 26831e7..d303446 100644 --- a/tests/ttk/entry.test +++ b/tests/ttk/entry.test @@ -281,7 +281,7 @@ test entry-9.1 "Index range invariants" -setup { } test entry-10.1 {configuration option: "-placeholder"} -setup { - pack [entry .e] + pack [ttk::entry .e] } -body { .e configure -placeholder {Some text} .e cget -placeholder @@ -289,4 +289,13 @@ test entry-10.1 {configuration option: "-placeholder"} -setup { destroy .e } -result {Some text} +test entry-10.2 {configuration option: "-placeholderforeground"} -setup { + pack [ttk::entry .e] +} -body { + .e configure -placeholder {Some text} -placeholderforeground red + .e cget -placeholderforeground +} -cleanup { + destroy .e +} -result {red} + tcltest::cleanupTests |