Update to tk 8.5.19

This commit is contained in:
Zachary Ware
2017-11-24 17:53:51 -06:00
parent 27e7dfc7da
commit c67b328f06
325 changed files with 12511 additions and 12047 deletions

View File

@@ -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)\]
@@ -501,7 +501,7 @@ end
%%EOF
"
test canvText-18.1 {bug fix 2525, find enclosed on text with newlines} {
test canvText-18.1 {bug fix 2525, find enclosed on text with newlines} -body {
catch {destroy .c}
canvas .c
pack .c
@@ -513,7 +513,9 @@ test canvText-18.1 {bug fix 2525, find enclosed on text with newlines} {
incr y2
update
.c find enclosed 99 99 [expr $x2 + $i] [expr $y2 + 1]
} 1
} -cleanup {
unset -nocomplain bbox x2 y2
} -result 1
test canvText-19.1 {patch 1006286, leading space caused wrap under Win32} {
catch {destroy .c}