(script-representative-chars): Add more

chars for latin.  Add data for symbol.
(setup-default-fontset): Add entries for phonetic, armenian, and
symbol.

1 files changed, 9 insertions, 1 deletions

diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el
index 21776380314..8d5d06e1384 100644
--- a/lisp/international/fontset.el
+++ b/lisp/international/fontset.el
@@ -140,7 +140,8 @@
         (tibetan . unicode-bmp)))
 
 (setq script-representative-chars
-      '((latin ?A ?Z ?a ?z)
+      '((latin ?A ?Z ?a ?z #x00C0 #x0100 #x0180 #x1e00)
+        (phonetic #x250 #x283)
         (greek #x3A9)
         (coptic #x3E2)
         (cyrillic #x42F)
@@ -171,6 +172,7 @@
         (runic #x16A0)
         (khmer #x1780)
         (mongolian #x1826)
+        (symbol #x201C #x2200 #x2500)
         (braille #x2800)
         (ideographic-description #x2FF0)
         (cjk-misc #x300E)
@@ -288,6 +290,10 @@
             (nil . "VISCII1.1-1")
             (nil . "ISO10646-1"))
 
+     (phonetic ,(font-spec :registry "iso10646-1" :script 'phonetic))
+
+     (armenian ,(font-spec :registry "iso10646-1" :script 'armenian))
+
      (thai  ,(font-spec :registry "iso10646-1" :otf '(thai nil nil (mark)))
             (nil . "TIS620*")
             (nil . "ISO8859-11"))
@@ -357,6 +363,8 @@
 
      (khmer ,(font-spec :registry "iso10646-1" :otf '(khmr nil (pres))))
 
+     (symbol ,(font-spec :registry "iso10646-1" :script 'symbol))
+
      (yi ,(font-spec :registry "iso10646-1" :script 'yi))
 
      (kana (nil . "JISX0208*")