From: Gerd Moellmann <gerd@gnu.org>
Date: Tue, 18 Jul 2000 19:03:13 +0000 (+0000)
Subject: (face-alternative-font-family-alist): Remove
X-Git-Tag: emacs-pretest-21.0.90~2749
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=434b9cc52c5f01ebff4f6e1c02eb731f257bcaa7;p=emacs.git

(face-alternative-font-family-alist): Remove
DEFVAR_LISP; staticpro instead.
---

diff --git a/src/xfaces.c b/src/xfaces.c
index 136b0376fe1..2e9cb8da4d0 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -6737,6 +6737,9 @@ syms_of_xfaces ()
   Qtty_color_by_index = intern ("tty-color-by-index");
   staticpro (&Qtty_color_by_index);
 
+  Vface_alternative_font_family_alist = Qnil;
+  staticpro (&Vface_alternative_font_family_alist);
+
   defsubr (&Sinternal_make_lisp_face);
   defsubr (&Sinternal_lisp_face_p);
   defsubr (&Sinternal_set_lisp_face_attribute);
@@ -6783,10 +6786,6 @@ instead of shades of gray for a face background color.\n\
 See `set-face-stipple' for possible values for this variable.");
   Vface_default_stipple = build_string ("gray3");
 
-  DEFVAR_LISP ("face-alternative-font-family-alist",
-	       &Vface_alternative_font_family_alist, "");
-  Vface_alternative_font_family_alist = Qnil;
-
 #if SCALABLE_FONTS
 
   DEFVAR_LISP ("scalable-fonts-allowed", &Vscalable_fonts_allowed,