(Finternal_set_lisp_face_attribute): Fix compilation

error.

(Finternal_set_lisp_face_attribute): Fix compilation
error.
496e1a5b · Gerd Moellmann · 5905ae8b · 496e1a5b · 496e1a5b
Commit 496e1a5b authored Oct 23, 2001 by Gerd Moellmann
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 1 deletion

src/ChangeLog src/ChangeLog +5 -0

src/xfaces.c src/xfaces.c +1 -1

No files found.
--- a/src/ChangeLog
+++ b/src/ChangeLog
+2001-10-23  Gerd Moellmann  <gerd@gnu.org>
+
+	* xfaces.c (Finternal_set_lisp_face_attribute): Fix compilation
+	error.
+
 2001-10-23  Eli Zaretskii  <eliz@is.elta.co.il>

 	* xfaces.c (Finternal_set_lisp_face_attribute)

--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -4043,7 +4043,7 @@ FRAME 0 means change the face on all frames, and change the default
  else if (EQ (attr, QCfont))
    {
 #ifdef HAVE_WINDOW_SYSTEM
-      if (FRAME_WINDOW_P (f))
+      if (FRAME_WINDOW_P (XFRAME (frame)))
 	{
 	  /* Set font-related attributes of the Lisp face from an XLFD
 	     font name.  */