From acfb10b843c6f27d4570af780ea2edbf6cfaf8dd Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 16 May 1997 00:59:15 +0000 Subject: [PATCH] (standard-fontset-spec): Name changed from default-fontset-spec. --- lisp/international/fontset.el | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el index e3dd5e1c063..b25bf5334e5 100644 --- a/lisp/international/fontset.el +++ b/lisp/international/fontset.el @@ -24,7 +24,7 @@ ;;; Code: -;; Set default REGISTRY property of charset to find an appropriate +;; Set standard REGISTRY property of charset to find an appropriate ;; font for each charset. This is used to generate a font name in a ;; fontset. If the value contains a character `-', the string before ;; that is embeded in `CHARSET_REGISTRY' field, and the string after @@ -363,10 +363,10 @@ by modifying FONTSET-SPEC appropriately. STYLE can be one of `bold', )) -;; Create default fontset from 16 dots fonts which are the most widely +;; Create standard fontset from 16 dots fonts which are the most widely ;; installed fonts. -(defvar default-fontset-spec - "-*-fixed-medium-r-normal-*-16-*-*-*-*-*-fontset-default, +(defvar standard-fontset-spec + "-*-fixed-medium-r-normal-*-16-*-*-*-*-*-fontset-standard, chinese-gb2312:-*-medium-r-normal-*-16-*-gb2312*-*, korean-ksc5601:-*-medium-r-normal-*-16-*-ksc5601*-*, chinese-cns11643-1:-*-medium-r-normal-*-16-*-cns11643*-1, @@ -376,13 +376,15 @@ by modifying FONTSET-SPEC appropriately. STYLE can be one of `bold', chinese-cns11643-5:-*-medium-r-normal-*-16-*-cns11643*-5, chinese-cns11643-6:-*-medium-r-normal-*-16-*-cns11643*-6, chinese-cns11643-7:-*-medium-r-normal-*-16-*-cns11643*-7" - "String of fontset spec of a default fontset. + "String of fontset spec of the standard fontset. +You have the biggest chance to display international characters +with correct glyphs by using the standard fontset. See the documentation of `create-fontset-from-fontset-spec' for the format.") ;; Create fontsets from X resources of the name `fontset-N (class ;; Fontset-N)' where N is integer 0, 1, ... ;; The values of the resources the string of the same format as -;; `default-fontset-spec'. +;; `standard-fontset-spec'. (defun create-fontset-from-x-resource () (let ((idx 0) -- 2.39.2