diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-06-21 20:22:56 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-06-21 20:22:56 +0000 |
| commit | ae0249dfd8b2e6133ee3fe0f7afcceb08b9d43a0 (patch) | |
| tree | 0556448ce1368625d9526153fc08dd80b2aa9cfe /lisp/faces.el | |
| parent | 697e4895a2d85c1b5170cddc275aa734fb5b38b3 (diff) | |
| download | emacs-ae0249dfd8b2e6133ee3fe0f7afcceb08b9d43a0.tar.gz | |
(face-equal): Do check the underline attribute.
Diffstat (limited to 'lisp/faces.el')
| -rw-r--r-- | lisp/faces.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index cfed0a65d26..8f008a42898 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -335,6 +335,7 @@ to NEW-FACE on frame NEW-FRAME." (and (equal (face-foreground face1 frame) (face-foreground face2 frame)) (equal (face-background face1 frame) (face-background face2 frame)) (equal (face-font face1 frame) (face-font face2 frame)) + (eq (face-underline-p face1 frame) (face-underline-p face2 frame)) ;; (equal (face-background-pixmap face1 frame) ;; (face-background-pixmap face2 frame)) )) |