1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-28 10:56:36 +00:00

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

and `oblique'.
This commit is contained in:
Gerd Moellmann 1999-09-09 14:54:23 +00:00
parent 72bba429ca
commit a48f602010

View File

@ -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. If FRAME is omitted or nil, use the selected frame.
Use `face-attribute' for finer control." Use `face-attribute' for finer control."
(let ((italic (face-attribute face :slant frame))) (let ((italic (face-attribute face :slant frame)))
(not (memq italic '(normal unspecified))))) (memq italic '(italic oblique))))