(Fontsets): Add description of the function set-fontset-font.

diff --git a/lispref/ChangeLog b/lispref/ChangeLog
index fa271dcf506891fbd8144f4a1c6e04caa6cf9c7f..7818775f669bb3beb0f2d4f4b2df352bbf3f3ce3 100644 (file)
--- a/lispref/ChangeLog
+++ b/lispref/ChangeLog
@@ -1,3 +1,8 @@
+2003-10-25  Kenichi Handa  <handa@m17n.org>
+
+       * display.texi (Fontsets): Add description of the function
+       set-fontset-font.
+
 2003-10-23  Luc Teirlinck  <teirllm@auburn.edu>
 
        * display.texi (Temporary Displays): Add xref to `Documentation

diff --git a/lispref/display.texi b/lispref/display.texi
index 105d7e6d3e6009d9f680b0d1aed5ab1d1f8f2bba..48628f6b5b7be68f1f168ab0e1871aff294511ea 100644 (file)
--- a/lispref/display.texi
+++ b/lispref/display.texi
@@ -2459,6 +2459,37 @@ Then, the font specifications for all but Chinese GB2312 characters have
 Chinese GB2312 characters has a wild card @samp{*} in the @var{family}
 field.
 
+@defun set-fontset-font name character fontname &optional frame
+This function modifies the existing fontset @var{name} to
+use the font name @var{fontname} for the character @var{character}.
+
+If @var{name} is nil, this function modifies the default
+fontset of which short name is "fontset-default".
+
+@var{character} may be a cons; @samp{(@var{from}
+. @var{to})}, where @var{from} and @var{to} are non-generic
+characters.  In that case, use @var{fontname} for all
+characters in the range @var{from} and @var{to} (inclusive).
+
+@var{character} may be a charset.  In that case, use
+@var{fontname} for all character in the charsets.
+
+@var{fontname} may be a cons; @samp{(@var{family}
+. @var{registry})}, where @var{family} is a family name of a
+font (possibly including a foundry name at the head),
+@var{registry} is a registry name of a font (possibly
+including an encoding name at the tail).
+
+For instance, this changes the default fontset to use a font
+of which registry name is "JISX0208.1983" for all characters
+belonging to the charset `japanese-jisx0208'.
+
+@example
+(set-fontset-font nil 'japanese-jisx0208 '(nil . "JISX0208.1983"))
+@end example
+
+@end defun
+
 @defun char-displayable-p char
 This function returns @code{t} if Emacs ought to be able to display
 @var{char}.  More precisely, if the selected frame's fontset has a