From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 13 Oct 2007 12:07:41 +0000 (+0000)
Subject: (make_fontset): Use larger_vector.
X-Git-Tag: emacs-pretest-23.0.90~10359
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2e0b197c9eaf4c6b396fb44e1f92510e0f402b51;p=emacs.git

(make_fontset): Use larger_vector.
---

diff --git a/src/fontset.c b/src/fontset.c
index 1d6e73517b6..2c0f0ac161c 100644
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -391,15 +391,7 @@ make_fontset (frame, name, base)
   while (!NILP (AREF (Vfontset_table, id))) id++;
 
   if (id + 1 == size)
-    {
-      Lisp_Object tem;
-      int i;
-
-      tem = Fmake_vector (make_number (size + 8), Qnil);
-      for (i = 0; i < size; i++)
-	AREF (tem, i) = AREF (Vfontset_table, i);
-      Vfontset_table = tem;
-    }
+    Vfontset_table = larger_vector (Vfontset_table, size + 8, Qnil);
 
   fontset = Fmake_char_table (Qfontset, Qnil);