summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2015-01-07 20:33:07 (GMT)
committerdgp <dgp@users.sourceforge.net>2015-01-07 20:33:07 (GMT)
commit8e30b0036fc3c6f090e11f2810f10a5d7c4a6602 (patch)
tree0df68f0700c08bd8fc4da604e78a09ec02767a9c /tests
parent1a1759175796d55be5837e81e5e0fb1dbabc1be8 (diff)
parente63bab777eed65bb380173f6f4e62e2e802e5456 (diff)
downloadtk-8e30b0036fc3c6f090e11f2810f10a5d7c4a6602.zip
tk-8e30b0036fc3c6f090e11f2810f10a5d7c4a6602.tar.gz
tk-8e30b0036fc3c6f090e11f2810f10a5d7c4a6602.tar.bz2
Reduce font-related porting fragility of test.
Diffstat (limited to 'tests')
-rw-r--r--tests/canvText.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/canvText.test b/tests/canvText.test
index 094bfa2..ff5e4b9 100644
--- a/tests/canvText.test
+++ b/tests/canvText.test
@@ -832,7 +832,7 @@ test canvText-16.1 {GetSelText procedure} -setup {
test canvText-17.1 {TextToPostscript procedure} -setup {
.c delete all
- set result {/Courier-Oblique findfont [font actual $font -size] scalefont ISOEncode setfont
+ set result {findfont [font actual $font -size] scalefont ISOEncode setfont
0.000 0.000 0.000 setrgbcolor AdjustColor
0 100 200 \[
\[(000)\]
@@ -856,7 +856,7 @@ end
.c itemconfig test -font $font -text "00000000" -width [expr 3*$ax]
.c itemconfig test -anchor n -fill black
set x [.c postscript]
- set x [string range $x [string first "/Courier-Oblique" $x] end]
+ set x [string range $x [string first "findfont " $x] end]
expr {$x eq [subst $result] ? "ok" : $x}
} -result ok