Mercurial > emacs

comparison lisp/international/fontset.el @ 50581:4daf1ecf4381

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(create-fontset-from-ascii-font): Doc fix. (x-must-resolve-font-name): Fix error message typo.
author John Paul Wallington <jpw@pobox.com>
date Mon, 14 Apr 2003 07:53:32 +0000
parents 125da3e3e9af
children c6cbdf65b72c
comparison
equal deleted inserted replaced
50580:bcc6ebd2dc9e 50581:4daf1ecf4381
396 (error 396 (error
397 (message "Warning: no fonts matching `%s' available" pattern) 397 (message "Warning: no fonts matching `%s' available" pattern)
398 (aset xlfd-fields index "*") 398 (aset xlfd-fields index "*")
399 (setq index (1+ index)))))) 399 (setq index (1+ index))))))
400 (unless ascii-font 400 (unless ascii-font
401 (error "No fonts founds")) 401 (error "No fonts found"))
402 ascii-font)) 402 ascii-font))
403 403
404 404
405 (defun x-complement-fontset-spec (xlfd-fields fontlist) 405 (defun x-complement-fontset-spec (xlfd-fields fontlist)
406 "Complement FONTLIST for charsets based on XLFD-FIELDS and return it. 406 "Complement FONTLIST for charsets based on XLFD-FIELDS and return it.
569 (defun create-fontset-from-ascii-font (font &optional resolved-font 569 (defun create-fontset-from-ascii-font (font &optional resolved-font
570 fontset-name) 570 fontset-name)
571 "Create a fontset from an ASCII font FONT. 571 "Create a fontset from an ASCII font FONT.
572 572
573 Optional 1st arg RESOLVED-FONT is a resolved name of FONT. If 573 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 574 omitted, `x-resolve-font-name' is called to get the resolved name. At
575 this time, if FONT is not available, error is signaled. 575 this time, if FONT is not available, error is signaled.
576 576
577 Optional 2nd arg FONTSET-NAME is a string to be used in 577 Optional 2nd arg FONTSET-NAME is a string to be used in
578 `<CHARSET_ENCODING>' fields of a new fontset name. If it is omitted, 578 `<CHARSET_ENCODING>' fields of a new fontset name. If it is omitted,
579 an appropriate name is generated automatically. 579 an appropriate name is generated automatically.