comparison lisp/international/fontset.el @ 18719:de8249499f33

(create-fontset-from-fontset-spec): Typo in doc-string fixed.
author Kenichi Handa <handa@m17n.org>
date Thu, 10 Jul 1997 07:36:22 +0000
parents 5d47a06d19bf
children cad4c032fa26
comparison
equal deleted inserted replaced
18718:1fb4c75d4f1f 18719:de8249499f33
330 FONTSET-NAME,CHARSET-NAME0:FONT-NAME0,CHARSET-NAME1:FONT-NAME1, ... 330 FONTSET-NAME,CHARSET-NAME0:FONT-NAME0,CHARSET-NAME1:FONT-NAME1, ...
331 Any number of SPACE, TAB, and NEWLINE can be put before and after commas. 331 Any number of SPACE, TAB, and NEWLINE can be put before and after commas.
332 If optional argument STYLE is specified, create a fontset of STYLE 332 If optional argument STYLE is specified, create a fontset of STYLE
333 by modifying FONTSET-SPEC appropriately. STYLE can be one of `bold', 333 by modifying FONTSET-SPEC appropriately. STYLE can be one of `bold',
334 `italic', and `bold-italic'. 334 `italic', and `bold-italic'.
335 If this function attemps to create already existing fontset, error is 335 If this function attempts to create already existing fontset, error is
336 signaled unlress the optional 3rd argument NOERROR is non-nil." 336 signaled unless the optional 3rd argument NOERROR is non-nil."
337 (if (not (string-match "^[^,]+" fontset-spec)) 337 (if (not (string-match "^[^,]+" fontset-spec))
338 (error "Invalid fontset spec: %s" fontset-spec)) 338 (error "Invalid fontset spec: %s" fontset-spec))
339 (let ((idx (match-end 0)) 339 (let ((idx (match-end 0))
340 (name (match-string 0 fontset-spec)) 340 (name (match-string 0 fontset-spec))
341 fontlist charset) 341 fontlist charset)