398 |
(aset xlfd-fields index "*") |
(aset xlfd-fields index "*") |
399 |
(setq index (1+ index)))))) |
(setq index (1+ index)))))) |
400 |
(unless ascii-font |
(unless ascii-font |
401 |
(error "No fonts founds")) |
(error "No fonts found")) |
402 |
ascii-font)) |
ascii-font)) |
403 |
|
|
404 |
|
|
571 |
"Create a fontset from an ASCII font FONT. |
"Create a fontset from an ASCII font FONT. |
572 |
|
|
573 |
Optional 1st arg RESOLVED-FONT is a resolved name of FONT. If |
Optional 1st arg RESOLVED-FONT is a resolved name of FONT. If |
574 |
omitted, x-resolve-font-name is called to get the resolved name. At |
omitted, `x-resolve-font-name' is called to get the resolved name. At |
575 |
this time, if FONT is not available, error is signaled. |
this time, if FONT is not available, error is signaled. |
576 |
|
|
577 |
Optional 2nd arg FONTSET-NAME is a string to be used in |
Optional 2nd arg FONTSET-NAME is a string to be used in |