From: Glenn Morris <rgm@gnu.org>
Date: Thu, 29 May 2003 17:08:16 +0000 (+0000)
Subject: (realize_default_face): Do not abort if lface is non-existent -
X-Git-Tag: ttn-vms-21-2-B4~9872
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=074468698d68e98cd9b66f4f329e1526228dad05;p=emacs.git

(realize_default_face): Do not abort if lface is non-existent -
reverts change from v1.275.
---

diff --git a/src/xfaces.c b/src/xfaces.c
index a48961207e4..fb6494aa464 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -6575,7 +6575,12 @@ realize_default_face (f)
   /* If the `default' face is not yet known, create it.  */
   lface = lface_from_face_name (f, Qdefault, 0);
   if (NILP (lface))
-    abort ();
+  {
+       Lisp_Object frame;
+       XSETFRAME (frame, f);
+       lface = Finternal_make_lisp_face (Qdefault, frame);
+  }
+
 
 #ifdef HAVE_WINDOW_SYSTEM
   if (FRAME_WINDOW_P (f))