summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2015-01-07 20:30:13 (GMT)
committerdgp <dgp@users.sourceforge.net>2015-01-07 20:30:13 (GMT)
commite63bab777eed65bb380173f6f4e62e2e802e5456 (patch)
tree0d04d099d5981fd070ca08b4b7db683a037ea6ba
parent3fd4914af5da89ce545fe0857f34a460cf781c0b (diff)
downloadtk-e63bab777eed65bb380173f6f4e62e2e802e5456.zip
tk-e63bab777eed65bb380173f6f4e62e2e802e5456.tar.gz
tk-e63bab777eed65bb380173f6f4e62e2e802e5456.tar.bz2
Reduce font-related porting fragility of test.
-rw-r--r--tests/canvText.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/canvText.test b/tests/canvText.test
index 20a39b0..7eef938 100644
--- a/tests/canvText.test
+++ b/tests/canvText.test
@@ -485,8 +485,8 @@ test canvText-17.1 {TextToPostscript procedure} {
.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]
-} "/Courier-Oblique findfont [font actual $font -size] scalefont ISOEncode setfont
+ set x [string range $x [string first "findfont " $x] end]
+} "findfont [font actual $font -size] scalefont ISOEncode setfont
0.000 0.000 0.000 setrgbcolor AdjustColor
100 200 \[
\[(000)\]