diff options
| author | Stefan Monnier | 2008-06-16 19:11:02 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2008-06-16 19:11:02 +0000 |
| commit | 93eed26bfbe11048c2d885017504591ad3cbd3c8 (patch) | |
| tree | c62198a27760c25cad719d58615fa81f03f36bca /src/font.c | |
| parent | 77989187bfa399f1300260893767ee6ed91e02d6 (diff) | |
| download | emacs-93eed26bfbe11048c2d885017504591ad3cbd3c8.tar.gz emacs-93eed26bfbe11048c2d885017504591ad3cbd3c8.zip | |
(font_unparse_gtkname): Use EQ to compare Lisp_Objects.
Diffstat (limited to 'src/font.c')
| -rw-r--r-- | src/font.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/font.c b/src/font.c index 420548171e5..51b7c2ec220 100644 --- a/src/font.c +++ b/src/font.c | |||
| @@ -1734,7 +1734,7 @@ font_unparse_gtkname (font, f, name, nbytes) | |||
| 1734 | } | 1734 | } |
| 1735 | 1735 | ||
| 1736 | weight = font_style_symbolic (font, FONT_WEIGHT_INDEX, 0); | 1736 | weight = font_style_symbolic (font, FONT_WEIGHT_INDEX, 0); |
| 1737 | if (weight == Qnormal) | 1737 | if (EQ (weight, Qnormal)) |
| 1738 | weight = Qnil; | 1738 | weight = Qnil; |
| 1739 | else if (! NILP (weight)) | 1739 | else if (! NILP (weight)) |
| 1740 | { | 1740 | { |
| @@ -1743,7 +1743,7 @@ font_unparse_gtkname (font, f, name, nbytes) | |||
| 1743 | } | 1743 | } |
| 1744 | 1744 | ||
| 1745 | slant = font_style_symbolic (font, FONT_SLANT_INDEX, 0); | 1745 | slant = font_style_symbolic (font, FONT_SLANT_INDEX, 0); |
| 1746 | if (slant == Qnormal) | 1746 | if (EQ (slant, Qnormal)) |
| 1747 | slant = Qnil; | 1747 | slant = Qnil; |
| 1748 | else if (! NILP (slant)) | 1748 | else if (! NILP (slant)) |
| 1749 | { | 1749 | { |