summaryrefslogtreecommitdiffstats
path: root/tests/textDisp.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-11-02 21:04:39 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-11-02 21:04:39 (GMT)
commite0a9d8d3100de26a961418e9ab3fc6087014e00b (patch)
tree3e0d929e5137c99f90d81bb4a91e6307813d1dd6 /tests/textDisp.test
parentef0028bd368a52a1819b55404e2e48e0ba79eded (diff)
downloadtk-e0a9d8d3100de26a961418e9ab3fc6087014e00b.zip
tk-e0a9d8d3100de26a961418e9ab3fc6087014e00b.tar.gz
tk-e0a9d8d3100de26a961418e9ab3fc6087014e00b.tar.bz2
Use "eq" not "==" when checking "tk windowingsystem"
Diffstat (limited to 'tests/textDisp.test')
-rw-r--r--tests/textDisp.test12
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/textDisp.test b/tests/textDisp.test
index de6fd22..b98150d 100644
--- a/tests/textDisp.test
+++ b/tests/textDisp.test
@@ -713,7 +713,7 @@ test textDisp-4.4 {UpdateDisplayInfo, wrap-mode "none"} {
[list [xchar 0] [yline 3] $fixedWidth $fixedHeight] \
{1.0 2.0 3.0}]
test textDisp-4.5 {UpdateDisplayInfo, tiny window} {
- if {[tk windowingsystem] == "win32"} {
+ if {[tk windowingsystem] eq "win32"} {
wm overrideredirect . 1
}
wm geom . 103x$height
@@ -727,7 +727,7 @@ test textDisp-4.5 {UpdateDisplayInfo, tiny window} {
{} \
[list [xchar 0] [yline 3] 1 $fixedHeight] \
{1.0 2.0 3.0}]
-if {[tk windowingsystem] == "win32"} {
+if {[tk windowingsystem] eq "win32"} {
wm overrideredirect . 0
}
test textDisp-4.6 {UpdateDisplayInfo, tiny window} {
@@ -738,7 +738,7 @@ test textDisp-4.6 {UpdateDisplayInfo, tiny window} {
# the overrideredirect on "." confuses the window manager and
# causes subsequent tests to fail.
- if {[tk windowingsystem] == "win32"} {
+ if {[tk windowingsystem] eq "win32"} {
wm overrideredirect . 1
}
frame .f2 -width 20 -height 100
@@ -767,7 +767,7 @@ test textDisp-4.7 {UpdateDisplayInfo, filling in extra vertical space} {
# the overrideredirect on "." confuses the window manager and
# causes subsequent tests to fail.
- if {[tk windowingsystem] == "win32"} {
+ if {[tk windowingsystem] eq "win32"} {
wm overrideredirect . 1
}
.t delete 1.0 end
@@ -3729,7 +3729,7 @@ test textDisp-24.15 {TkTextCharLayoutProc, -wrap none} {
lequal [list [.t bbox 1.19] [.t bbox 1.20]] $expected
} {1}
test textDisp-24.16 {TkTextCharLayoutProc, no chars fit} {
- if {[tk windowingsystem] == "win32"} {
+ if {[tk windowingsystem] eq "win32"} {
wm overrideredirect . 1
}
.t configure -wrap char
@@ -3743,7 +3743,7 @@ test textDisp-24.16 {TkTextCharLayoutProc, no chars fit} {
} [list [list [xchar 0] [yline 1] 1 $fixedHeight] \
[list [xchar 0] [yline 2] 1 $fixedHeight] \
[list [xchar 0] [yline 3] 1 $fixedHeight]]
-if {[tk windowingsystem] == "win32"} {
+if {[tk windowingsystem] eq "win32"} {
wm overrideredirect . 0
}
test textDisp-24.17 {TkTextCharLayoutProc, -wrap word} {