bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#33019: 26.1; can not set fontset as frame font by set-frame-font


From: ynyaaa
Subject: bug#33019: 26.1; can not set fontset as frame font by set-frame-font
Date: Sat, 13 Oct 2018 23:43:38 +0900
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/26.1 (windows-nt)

Eli Zaretskii <address@hidden> writes:
> If you use a font instead of :family, does the face work as expected?

Evaluating the form below, five U+4E00s are inserted with same glyphs.
C-u C-x = on each character shows the same information.

>              display: by this font (glyph code)
>    uniscribe:-outline-Noto Sans CJK JP 
> Regular-normal-normal-normal-sans-17-*-*-*-p-*-iso8859-1 (#x2667)

(let ((prefix "-outline-Noto Serif CJK 
JP-normal-normal-normal-serif-*-*-*-*-p-*-"))
  (set-frame-font "Noto Mono")
  (set-fontset-font "fontset-default" '(#x4E00 . #x9FFF)
                    "Noto Sans CJK JP Regular")
  (insert "\x4E00"
          (propertize "\x4E00" 'face '(:family "Noto Serif CJK JP"))
          (propertize "\x4E00" 'face '(:font "Noto Serif CJK JP"))
          (propertize "\x4E00" 'face (list :font (concat prefix "iso10646-1")))
          (propertize "\x4E00" 'face (list :font (concat prefix 
"jisx0208-sjis")))
          ))

If set-frame-font and set-fontset-font are disabled, only the second
U+4E00 with :family face is shown by "Noto Serif CJK JP".
The rest four U+4E00s are shown by "游ゴシック", same as no font settings.

(let ((prefix "-outline-Noto Serif CJK 
JP-normal-normal-normal-serif-17-*-*-*-p-*-"))
  (insert "\x4E00"
          (propertize "\x4E00" 'face '(:family "Noto Serif CJK JP"))
          (propertize "\x4E00" 'face '(:font "Noto Serif CJK JP"))
          (propertize "\x4E00" 'face (list :font (concat prefix "iso10646-1")))
          (propertize "\x4E00" 'face (list :font (concat prefix 
"jisx0208-sjis")))
          ))

Face with :font property seems not working.
Then I tried with ascii characters.

(let ((prefix "-outline-Verdana-normal-normal-normal-sans-*-*-*-*-p-*-"))
  (insert "A"
          (propertize "A" 'face '(:family "Verdana"))
          (propertize "A" 'face '(:font "Verdana"))
          (propertize "A" 'face (list :font (concat prefix "iso8859-1")))
          (propertize "A" 'face (list :font (concat prefix "iso10646-1")))
          ))

Only the second A is shown by "Verdana",
the rest are shown by "Courier New".





reply via email to

[Prev in Thread] Current Thread [Next in Thread]