(setup-default-fontset): Append entries for mathematical, instead of

prepending.

diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el
index 2d414d6..65b9e4a 100644 (file)
--- a/lisp/international/fontset.el
+++ b/lisp/international/fontset.el
@@ -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))