summaryrefslogtreecommitdiff
path: root/lisp/faces.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2012-11-15 21:44:02 -0500
committerGlenn Morris <rgm@gnu.org>2012-11-15 21:44:02 -0500
commitdedd188497e04b8f0c1ade515e41511759316d2d (patch)
tree63cdc6a5d8f1596e17f37a2cc9fe5f3a929a61b6 /lisp/faces.el
parentd56f2e49b2353336e853025219440c3e1572524e (diff)
downloademacs-dedd188497e04b8f0c1ade515e41511759316d2d.tar.gz
* lisp/faces.el (face-underline-p): Use face-attribute-specified-or.
Diffstat (limited to 'lisp/faces.el')
-rw-r--r--lisp/faces.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/faces.el b/lisp/faces.el
index d07c4d6f5a5..9e0ca962499 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -497,7 +497,7 @@ with the `default' face (which is always completely specified)."
If the optional argument FRAME is given, report on face FACE in that frame.
If FRAME is t, report on the defaults for face FACE (for new frames).
If FRAME is omitted or nil, use the selected frame."
- (not (memq (face-attribute face :underline frame) '(unspecified nil))))
+ (face-attribute-specified-or (face-attribute face :underline frame) nil))
(defun face-inverse-video-p (face &optional frame)