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

[Kenichi Handa]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Branch:         EMACS_23_1_RC
Changes by:     Kenichi Handa <handa>   09/07/08 07:25:08

Modified files:
        lisp/international: fontset.el 

Log message:
        (setup-default-fontset): For each script, append (not set) font-specs.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/international/fontset.el?cvsroot=emacs&only_with_tag=EMACS_23_1_RC&r1=1.102&r2=1.102.2.1

Patches:
Index: fontset.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/international/fontset.el,v
retrieving revision 1.102
retrieving revision 1.102.2.1
diff -u -b -r1.102 -r1.102.2.1
--- fontset.el  19 Jun 2009 01:51:10 -0000      1.102
+++ fontset.el  8 Jul 2009 07:25:07 -0000       1.102.2.1
@@ -526,7 +526,8 @@
                    mahjong-tile
                    domino-tile))
     (set-fontset-font "fontset-default"
-                     script (font-spec :registry "iso10646-1" :script script)))
+                     script (font-spec :registry "iso10646-1" :script script)
+                     nil 'append))
 
   ;; Special settings for `MATHEMATICAL (U+1D400..U+1D7FF)'.
   (dolist (math-subgroup '((#x1D400 #x1D433 mathematical-bold)