From: Gerd Moellmann <gerd@gnu.org>
Date: Thu, 9 Sep 1999 14:54:23 +0000 (+0000)
Subject: (face-italic-p): Return t only for values `italic'
X-Git-Tag: emacs-pretest-21.0.90~6826
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a48f6020103a5dae448440026abdd6e1ff957c48;p=emacs.git

(face-italic-p): Return t only for values `italic'
and `oblique'.
---

diff --git a/lisp/faces.el b/lisp/faces.el
index ad4a00c7c33..c8df93071cb 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -380,7 +380,7 @@ If FRAME is t, report on the defaults for face FACE (for new frames).
 If FRAME is omitted or nil, use the selected frame.
 Use `face-attribute' for finer control."
   (let ((italic (face-attribute face :slant frame)))
-    (not (memq italic '(normal unspecified)))))
+    (memq italic '(italic oblique))))