# HG changeset patch # User Gerd Moellmann # Date 936888863 0 # Node ID 4dbea85f5af06b1613949befffcb7005f5cc7536 # Parent c60d7a800e9c2266c080e67a23b46f39bef85160 (face-italic-p): Return t only for values `italic' and `oblique'. diff -r c60d7a800e9c -r 4dbea85f5af0 lisp/faces.el --- a/lisp/faces.el Thu Sep 09 04:24:12 1999 +0000 +++ b/lisp/faces.el Thu Sep 09 14:54:23 1999 +0000 @@ -380,7 +380,7 @@ 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))))