[Emacs-diffs] emacs/lisp/international fontset.el

[Kenichi Handa]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Kenichi Handa <handa>   09/04/02 02:47:51

Modified files:
        lisp/international: fontset.el 

Log message:
        (setup-default-fontset): Specify
        iso10646-1 font for characters in PUA of BMP.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/international/fontset.el?cvsroot=emacs&r1=1.99&r2=1.100

Patches:
Index: fontset.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/international/fontset.el,v
retrieving revision 1.99
retrieving revision 1.100
diff -u -b -r1.99 -r1.100
--- fontset.el  24 Mar 2009 00:55:36 -0000      1.99
+++ fontset.el  2 Apr 2009 02:47:50 -0000       1.100
@@ -578,7 +578,11 @@
   (set-fontset-font "fontset-default" '(#x20000 . #x2FFFF)
                    '(nil . "unicode-sip"))
 
-  (set-fontset-font "fontset-default" '(#xE000 . #xF8FF) nil))
+  (set-fontset-font "fontset-default" '(#xE000 . #xF8FF)
+                   '(nil . "iso10646-1"))
+  ;; Don't try the fallback fonts even if no suitable font was found
+  ;; by the above font-spec.
+  (set-fontset-font "fontset-default" '(#xE000 . #xF8FF) nil nil 'append))
 
 (defun create-default-fontset ()
   "Create the default fontset.