diff options
| author | Richard M. Stallman | 1996-06-10 20:58:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-06-10 20:58:24 +0000 |
| commit | 50e3dcf5de907e4915fe99ce28ce69f4ed05323a (patch) | |
| tree | bad2a9ce29e0ddb6d82e4ab5b4b89c05069b9e85 /src | |
| parent | fd8ff63d8d9ec12d0029b857119d39483ff06109 (diff) | |
| download | emacs-50e3dcf5de907e4915fe99ce28ce69f4ed05323a.tar.gz emacs-50e3dcf5de907e4915fe99ce28ce69f4ed05323a.zip | |
(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.
Diffstat (limited to 'src')
| -rw-r--r-- | src/xfaces.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/xfaces.c b/src/xfaces.c index ced23638926..50a80b6f91c 100644 --- a/src/xfaces.c +++ b/src/xfaces.c | |||
| @@ -567,7 +567,7 @@ init_frame_faces (f) | |||
| 567 | 567 | ||
| 568 | result = Qnil; | 568 | result = Qnil; |
| 569 | FOR_EACH_FRAME (tail, frame) | 569 | FOR_EACH_FRAME (tail, frame) |
| 570 | if (FRAME_X_P (XFRAME (frame)) | 570 | if ((FRAME_MSDOS_P (XFRAME (frame)) || FRAME_X_P (XFRAME (frame))) |
| 571 | && XFRAME (frame) != f) | 571 | && XFRAME (frame) != f) |
| 572 | { | 572 | { |
| 573 | result = frame; | 573 | result = frame; |
| @@ -1121,7 +1121,7 @@ DEFUN ("make-face-internal", Fmake_face_internal, Smake_face_internal, 1, 1, 0, | |||
| 1121 | 1121 | ||
| 1122 | FOR_EACH_FRAME (rest, frame) | 1122 | FOR_EACH_FRAME (rest, frame) |
| 1123 | { | 1123 | { |
| 1124 | if (FRAME_X_P (XFRAME (frame))) | 1124 | if (FRAME_MSDOS_P (XFRAME (frame)) || FRAME_X_P (XFRAME (frame))) |
| 1125 | ensure_face_ready (XFRAME (frame), id); | 1125 | ensure_face_ready (XFRAME (frame), id); |
| 1126 | } | 1126 | } |
| 1127 | return Qnil; | 1127 | return Qnil; |
| @@ -1148,7 +1148,7 @@ DEFUN ("set-face-attribute-internal", Fset_face_attribute_internal, | |||
| 1148 | if (id < 0 || id >= next_face_id) | 1148 | if (id < 0 || id >= next_face_id) |
| 1149 | error ("Face id out of range"); | 1149 | error ("Face id out of range"); |
| 1150 | 1150 | ||
| 1151 | if (! FRAME_X_P (f)) | 1151 | if (! FRAME_X_P (f) && ! FRAME_MSDOS_P (f)) |
| 1152 | return Qnil; | 1152 | return Qnil; |
| 1153 | 1153 | ||
| 1154 | ensure_face_ready (f, id); | 1154 | ensure_face_ready (f, id); |