diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-01-22 12:14:43 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-01-22 12:14:43 (GMT) |
commit | 9b372a4bc9793dcb2f9e612afb5d23ba7f1a386c (patch) | |
tree | ec775c6b2b666a4267b69fb645bce461463562a7 /tests/textTag.test | |
parent | 452161e760ca95d60fbbf4b8e3547102ef2b035d (diff) | |
download | tk-9b372a4bc9793dcb2f9e612afb5d23ba7f1a386c.zip tk-9b372a4bc9793dcb2f9e612afb5d23ba7f1a386c.tar.gz tk-9b372a4bc9793dcb2f9e612afb5d23ba7f1a386c.tar.bz2 |
Get rid of tagPtr->(reliefObj|justifyObj|overstrikePtr|underlinePtr|elideObj). Due to TIP #613, they are not needed any more.
Diffstat (limited to 'tests/textTag.test')
-rw-r--r-- | tests/textTag.test | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/textTag.test b/tests/textTag.test index f3bc53e..b33787e 100644 --- a/tests/textTag.test +++ b/tests/textTag.test @@ -169,7 +169,7 @@ test textTag-1.20 {tag configuration options} -body { .t tag cget x -overstrike } -cleanup { .t tag configure x -overstrike [lindex [.t tag configure x -overstrike] 3] -} -result {on} +} -result 1 test textTag-1.21 {configuration options} -body { .t tag configure x -overstrike stupid } -cleanup { @@ -291,7 +291,7 @@ test textTag-1.34 {tag configuration options} -body { .t tag cget x -underline } -cleanup { .t tag configure x -underline [lindex [.t tag configure x -underline] 3] -} -result {no} +} -result 0 test textTag-1.35 {configuration options} -body { .t tag configure x -underline stupid } -cleanup { @@ -501,7 +501,7 @@ test textTag-5.4 {TkTextTagCmd - "configure" option} -body { .t tag configure x -underline } -cleanup { .t tag delete x -} -result {-underline {} {} {} yes} +} -result {-underline {} {} {} 1} test textTag-5.4a {TkTextTagCmd - "configure" option} -body { .t tag delete x .t tag configure x -underlinefg lightgreen @@ -515,7 +515,7 @@ test textTag-5.5 {TkTextTagCmd - "configure" option} -body { .t tag cget x -overstrike } -cleanup { .t tag delete x -} -result {on} +} -result 1 test textTag-5.5a {TkTextTagCmd - "configure" option} -body { .t tag delete x .t tag configure x -overstrikefg lightgreen |