comparison src/xfaces.c @ 36481:8456d3257f81

(Finternal_set_lisp_face_attribute) [!HAVE_WINDOW_SYSTEM]: Record the new attribute in the frame's parameters alist.

36480:59455f09babf

    {
      ++face_change_count;
      ++windows_or_buffers_changed;
    }

#ifdef HAVE_WINDOW_SYSTEM

  if (!UNSPECIFIEDP (value)
      && NILP (Fequal (old_value, value)))
    {
      Lisp_Object param;

      param = Qnil;

      if (EQ (face, Qdefault))
	{
	  /* Changed font-related attributes of the `default' face are
	     reflected in changed `font' frame parameters. */
	  if ((font_related_attr_p || font_attr_p)
	      && lface_fully_specified_p (XVECTOR (lface)->contents))
	    set_font_frame_param (frame, lface);
	  else if (EQ (attr, QCforeground))
	    param = Qforeground_color;
	  else if (EQ (attr, QCbackground))
	    param = Qbackground_color;
	}
#ifndef WINDOWSNT
      else if (EQ (face, Qscroll_bar))
	{
	  /* Changing the colors of `scroll-bar' sets frame parameters
	     `scroll-bar-foreground' and `scroll-bar-background'. */

	  /* Changing background color of `mouse' sets frame parameter
	     `mouse-color'.  */
	  if (EQ (attr, QCbackground))
	    param = Qmouse_color;
	}
      else if (EQ (face, Qmenu))
	++menu_face_change_count;

      if (!NILP (param))
	if (EQ (frame, Qt))

	    XCAR (cons) = param;
	    XCDR (cons) = value;
	    Fmodify_frame_parameters (frame, Vparam_value_alist);
	  }
    }

#endif /* HAVE_WINDOW_SYSTEM */

  return face;
}

36481:8456d3257f81

    {
      ++face_change_count;
      ++windows_or_buffers_changed;
    }

  if (!UNSPECIFIEDP (value)
      && NILP (Fequal (old_value, value)))
    {
      Lisp_Object param;

      param = Qnil;

      if (EQ (face, Qdefault))
	{
#ifdef HAVE_WINDOW_SYSTEM
	  /* Changed font-related attributes of the `default' face are
	     reflected in changed `font' frame parameters. */
	  if ((font_related_attr_p || font_attr_p)
	      && lface_fully_specified_p (XVECTOR (lface)->contents))
	    set_font_frame_param (frame, lface);
	  else
#endif /* HAVE_WINDOW_SYSTEM */

	  if (EQ (attr, QCforeground))
	    param = Qforeground_color;
	  else if (EQ (attr, QCbackground))
	    param = Qbackground_color;
	}
#ifdef HAVE_WINDOW_SYSTEM
#ifndef WINDOWSNT
      else if (EQ (face, Qscroll_bar))
	{
	  /* Changing the colors of `scroll-bar' sets frame parameters
	     `scroll-bar-foreground' and `scroll-bar-background'. */

	  /* Changing background color of `mouse' sets frame parameter
	     `mouse-color'.  */
	  if (EQ (attr, QCbackground))
	    param = Qmouse_color;
	}
#endif /* HAVE_WINDOW_SYSTEM */
      else if (EQ (face, Qmenu))
	++menu_face_change_count;

      if (!NILP (param))
	if (EQ (frame, Qt))

	    XCAR (cons) = param;
	    XCDR (cons) = value;
	    Fmodify_frame_parameters (frame, Vparam_value_alist);
	  }
    }

  return face;
}