Mercurial > emacs
comparison src/font.c @ 96017:54d310663505
(font_unparse_gtkname): Use EQ to compare Lisp_Objects.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 16 Jun 2008 19:11:02 +0000 |
| parents | c1105df0f9c8 |
| children | 2a8c4f357ec4 |
comparison
equal
deleted
inserted
replaced
| 96016:c1105df0f9c8 | 96017:54d310663505 |
|---|---|
| 1732 family = SYMBOL_NAME (family); | 1732 family = SYMBOL_NAME (family); |
| 1733 len += SBYTES (family); | 1733 len += SBYTES (family); |
| 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 { |
| 1741 weight = SYMBOL_NAME (weight); | 1741 weight = SYMBOL_NAME (weight); |
| 1742 len += SBYTES (weight); | 1742 len += SBYTES (weight); |
| 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 { |
| 1750 slant = SYMBOL_NAME (slant); | 1750 slant = SYMBOL_NAME (slant); |
| 1751 len += SBYTES (slant); | 1751 len += SBYTES (slant); |