#2149 font test suite failures 21.8, 28.6

[Larry W. Virden]

Tk cvs head build on sparc solaris 2.9, using sun c
compiler , test suite run displaying back through
windows xp exceed 10.0.0.12 .

The following font test suite failed. I'm uncertain
whether this is a unix specific font failure or a
generic failure.

font.test

==== font-21.8 Tk_PostscriptFontName procedure: spaces
FAILED
==== Contents of test case:

set x [font actual {{lucida bright} 10} -family]
if {[string match lucida*bright $x]} {
psfontname "{lucida bright} 10"
} else {
set x {LucidaBright}
}

---- Result was:
Lucidabright
---- Result should have been (exact matching):
LucidaBright
==== font-21.8 FAILED

==== font-38.5 ParseFontNameObj procedure: begins with
* FAILED
==== Contents of test case:

lindex [font actual
*-times-xyz-*-*-*-*-*-*-*-*-*-*-*] 1

---- Result was:
fixed
---- Result should have been (exact matching):
times
==== font-38.5 FAILED

==== font-38.6 ParseFontNameObj procedure: begins with
* FAILED
==== Contents of test case:

font actual *-times-xyz -family
---- Result was:
fixed
---- Result should have been (exact matching):
times
==== font-38.6 FAILED

==== font-40.2 TkFontParseXLFD procedure: no initial
dash FAILED
==== Contents of test case:

font actual *-times-*-*-*-*-*-*-*-*-*-*-*-xyz -family

---- Result was:
fixed
---- Result should have been (exact matching):
times
==== font-40.2 FAILED

==== font-40.3 TkFontParseXLFD procedure: not enough
fields FAILED
==== Contents of test case:

font actual -xyz-times-*-*-* -family

---- Result was:
fixed
---- Result should have been (exact matching):
times
==== font-40.3 FAILED

==== font-40.5 TkFontParseXLFD procedure: all fields
specified FAILED
==== Contents of test case:

lindex [font actual
-foundry-times-weight-slant-setwidth-addstyle-10-10-10-1
0-spacing-avgwidth-registry-encoding] 1

---- Result was:
fixed
---- Result should have been (exact matching):
times
==== font-40.5 FAILED