# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1213643462 0
# Node ID 54d31066350534223ea69288c90ecb4ce0690b89
# Parent  c1105df0f9c8b4dca216e54e69bf724c029a96eb
(font_unparse_gtkname): Use EQ to compare Lisp_Objects.

diff -r c1105df0f9c8 -r 54d310663505 src/ChangeLog
--- a/src/ChangeLog	Mon Jun 16 14:35:24 2008 +0000
+++ b/src/ChangeLog	Mon Jun 16 19:11:02 2008 +0000
@@ -1,3 +1,7 @@
+2008-06-16  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* font.c (font_unparse_gtkname): Use EQ to compare Lisp_Objects.
+
 2008-06-16  Chong Yidong  <cyd@stupidchicken.com>
 
 	* font.c (font_parse_fcname): Fix handling of unknown-spec string.
@@ -13,13 +17,13 @@
 
 2008-06-16  Jason Rumney  <jasonr@gnu.org>
 
-        * font.h (font_style_symbolic_from_value): Remove.
-
-        * font.c (font_style_symbolic_from_value): Remove.
-        (font_style_symbolic): Revert to pre 2008-06-13 version.
-
-        * w32font.c (w32_to_fc_weight): New function.
-        (w32font_full_name, logfont_to_fcname): Use it.
+	* font.h (font_style_symbolic_from_value): Remove.
+
+	* font.c (font_style_symbolic_from_value): Remove.
+	(font_style_symbolic): Revert to pre 2008-06-13 version.
+
+	* w32font.c (w32_to_fc_weight): New function.
+	(w32font_full_name, logfont_to_fcname): Use it.
 
 2008-06-16  Kenichi Handa  <handa@m17n.org>
 
diff -r c1105df0f9c8 -r 54d310663505 src/font.c
--- a/src/font.c	Mon Jun 16 14:35:24 2008 +0000
+++ b/src/font.c	Mon Jun 16 19:11:02 2008 +0000
@@ -1734,7 +1734,7 @@
     }
 
   weight = font_style_symbolic (font, FONT_WEIGHT_INDEX, 0);
-  if (weight == Qnormal)
+  if (EQ (weight, Qnormal))
     weight = Qnil;
   else if (! NILP (weight))
     {
@@ -1743,7 +1743,7 @@
     }
 
   slant = font_style_symbolic (font, FONT_SLANT_INDEX, 0);
-  if (slant == Qnormal)
+  if (EQ (slant, Qnormal))
     slant = Qnil;
   else if (! NILP (slant))
     {