# HG changeset patch # User Eli Zaretskii # Date 946918372 0 # Node ID 4efa5e54e9a91e2fceff9635501db9bd0037dc2b # Parent 21f49fa0782b5d1710e2950ecf1f3592b47b9067 (Qunspecified_fg, Qunspecified_bg): Remove. (syms_of_xfaces): Remove their staticpro's. (tty_color_name): Return Lisp strings for unspecified fore- and back-ground colors. (Finternal_set_lisp_face_attribute): Remove the special treatment for Qunspecified_{f,b}g. (realize_default_face): Replace Qunspecified_{f,b}g with a Lisp string. diff -r 21f49fa0782b -r 4efa5e54e9a9 src/xfaces.c --- a/src/xfaces.c Mon Jan 03 15:56:05 2000 +0000 +++ b/src/xfaces.c Mon Jan 03 16:52:52 2000 +0000 @@ -282,7 +282,9 @@ Lisp_Object Qultra_expanded; Lisp_Object Qreleased_button, Qpressed_button; Lisp_Object QCstyle, QCcolor, QCline_width; -Lisp_Object Qunspecified, Qunspecified_fg, Qunspecified_bg; +Lisp_Object Qunspecified; + +char unspecified_fg[] = "unspecified-fg", unspecified_bg[] = "unspecified-bg"; /* The symbol `x-charset-registry'. This property of charsets defines the X registry and encoding that fonts should have that are used to @@ -1194,10 +1196,11 @@ by index using the default color mapping on a Windows console. */ #endif - return - idx == FACE_TTY_DEFAULT_FG_COLOR ? Qunspecified_fg - : idx == FACE_TTY_DEFAULT_BG_COLOR ? Qunspecified_bg - : Qunspecified; + if (idx == FACE_TTY_DEFAULT_FG_COLOR) + return build_string (unspecified_fg); + if (idx == FACE_TTY_DEFAULT_BG_COLOR) + return build_string (unspecified_bg); + return Qunspecified; } /* Return non-zero if COLOR_NAME is a shade of gray (or white or @@ -3445,8 +3448,7 @@ } else if (EQ (attr, QCforeground)) { - if (!UNSPECIFIEDP (value) - && !EQ (value, Qunspecified_fg) && !EQ (value, Qunspecified_bg)) + if (!UNSPECIFIEDP (value)) { /* Don't check for valid color names here because it depends on the frame (display) whether the color will be valid @@ -3460,8 +3462,7 @@ } else if (EQ (attr, QCbackground)) { - if (!UNSPECIFIEDP (value) - && !EQ (value, Qunspecified_bg) && !EQ (value, Qunspecified_fg)) + if (!UNSPECIFIEDP (value)) { /* Don't check for valid color names here because it depends on the frame (display) whether the color will be valid @@ -5707,7 +5708,7 @@ else if (FRAME_X_P (f)) return 0; else if (FRAME_TERMCAP_P (f) || FRAME_MSDOS_P (f)) - LFACE_FOREGROUND (lface) = Qunspecified_fg; + LFACE_FOREGROUND (lface) = build_string (unspecified_fg); else abort (); } @@ -5722,7 +5723,7 @@ else if (FRAME_X_P (f)) return 0; else if (FRAME_TERMCAP_P (f) || FRAME_MSDOS_P (f)) - LFACE_BACKGROUND (lface) = Qunspecified_bg; + LFACE_BACKGROUND (lface) = build_string (unspecified_bg); else abort (); } @@ -6662,10 +6663,6 @@ staticpro (&Qforeground_color); Qunspecified = intern ("unspecified"); staticpro (&Qunspecified); - Qunspecified_fg = intern ("unspecified-fg"); - staticpro (&Qunspecified_fg); - Qunspecified_bg = intern ("unspecified-bg"); - staticpro (&Qunspecified_bg); Qx_charset_registry = intern ("x-charset-registry"); staticpro (&Qx_charset_registry);