# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 834440304 0
# Node ID 9a6c8d10ac5ff933818ce4a89767cf2c108103bb
# Parent  274f64e997f0db981f36a504fbd15adc5366c125
(init_frame_faces): Build faces for an MSDOS frame like for X frame.
(Fmake_face_internal): Call `ensure_face_ready' for MSDOS frames.
(Fset_face_attribute_internal): Support face attributes for MSDOS frames.

diff -r 274f64e997f0 -r 9a6c8d10ac5f src/xfaces.c
--- a/src/xfaces.c	Mon Jun 10 20:56:25 1996 +0000
+++ b/src/xfaces.c	Mon Jun 10 20:58:24 1996 +0000
@@ -567,7 +567,7 @@
     
     result = Qnil;
     FOR_EACH_FRAME (tail, frame)
-      if (FRAME_X_P (XFRAME (frame))
+      if ((FRAME_MSDOS_P (XFRAME (frame)) || FRAME_X_P (XFRAME (frame)))
 	  && XFRAME (frame) != f)
 	{
 	  result = frame;
@@ -1121,7 +1121,7 @@
 
   FOR_EACH_FRAME (rest, frame)
     {
-      if (FRAME_X_P (XFRAME (frame)))
+      if (FRAME_MSDOS_P (XFRAME (frame)) || FRAME_X_P (XFRAME (frame)))
 	ensure_face_ready (XFRAME (frame), id);
     }
   return Qnil;
@@ -1148,7 +1148,7 @@
   if (id < 0 || id >= next_face_id)
     error ("Face id out of range");
 
-  if (! FRAME_X_P (f))
+  if (! FRAME_X_P (f) && ! FRAME_MSDOS_P (f))
     return Qnil;
 
   ensure_face_ready (f, id);