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

[Kenichi Handa]

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

Modified files:
        lisp/international: fontset.el 

Log message:
        (setup-default-fontset): Append entries for mathematical, instead of
        prepending.

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

Patches:
Index: fontset.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/international/fontset.el,v
retrieving revision 1.96
retrieving revision 1.97
diff -u -b -r1.96 -r1.97
--- fontset.el  5 Feb 2009 06:23:19 -0000       1.96
+++ fontset.el  5 Feb 2009 07:09:47 -0000       1.97
@@ -557,7 +557,7 @@
              (setcdr slot (vconcat (cdr slot) (vector (car math-subgroup))))
            (setcdr slot (vector (cadr slot) (car math-subgroup))))
        (setq slot (list (nth 2 math-subgroup) (car math-subgroup)))
-       (push slot script-representative-chars)))
+       (nconc script-representative-chars (list slot))))
     (set-fontset-font
      "fontset-default"
      (cons (car math-subgroup) (nth 1 math-subgroup))