diff options
| author | Glenn Morris | 2012-11-15 21:44:02 -0500 |
|---|---|---|
| committer | Glenn Morris | 2012-11-15 21:44:02 -0500 |
| commit | dedd188497e04b8f0c1ade515e41511759316d2d (patch) | |
| tree | 63cdc6a5d8f1596e17f37a2cc9fe5f3a929a61b6 /lisp/faces.el | |
| parent | d56f2e49b2353336e853025219440c3e1572524e (diff) | |
| download | emacs-dedd188497e04b8f0c1ade515e41511759316d2d.tar.gz emacs-dedd188497e04b8f0c1ade515e41511759316d2d.zip | |
* lisp/faces.el (face-underline-p): Use face-attribute-specified-or.
Diffstat (limited to 'lisp/faces.el')
| -rw-r--r-- | lisp/faces.el | 2 |
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)." | |||
| 497 | If the optional argument FRAME is given, report on face FACE in that frame. | 497 | If the optional argument FRAME is given, report on face FACE in that frame. |
| 498 | If FRAME is t, report on the defaults for face FACE (for new frames). | 498 | If FRAME is t, report on the defaults for face FACE (for new frames). |
| 499 | If FRAME is omitted or nil, use the selected frame." | 499 | If FRAME is omitted or nil, use the selected frame." |
| 500 | (not (memq (face-attribute face :underline frame) '(unspecified nil)))) | 500 | (face-attribute-specified-or (face-attribute face :underline frame) nil)) |
| 501 | 501 | ||
| 502 | 502 | ||
| 503 | (defun face-inverse-video-p (face &optional frame) | 503 | (defun face-inverse-video-p (face &optional frame) |