mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-27 10:54:40 +00:00
Code Issues Releases Activity

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

Browse Source 
and `oblique'.
This commit is contained in:
Gerd Moellmann 1999-09-09 14:54:23 +00:00
parent 72bba429ca
commit a48f602010
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/faces.el
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.
Use `face-attribute' for finer control."
(let ((italic (face-attribute face :slant frame)))
(not (memq italic '(normal unspecified)))))
(memq italic '(italic oblique))))