summaryrefslogtreecommitdiff
path: root/lisp/faces.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2005-06-17 14:30:55 +0000
committerRichard M. Stallman <rms@gnu.org>2005-06-17 14:30:55 +0000
commit218624259914e204f73c83a49a631eca8bff5a78 (patch)
tree6b4a49d6f27fea442e8b6006a7fe4124cf757717 /lisp/faces.el
parent043f95aba6f311431cf6b3fefdd81def8b25a789 (diff)
downloademacs-218624259914e204f73c83a49a631eca8bff5a78.tar.gz
(underline): Try bold if terminal doesn't support underline.
Diffstat (limited to 'lisp/faces.el')
-rw-r--r--lisp/faces.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/faces.el b/lisp/faces.el
index fcac684b3a1..dc94beb4aa6 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -2035,7 +2035,11 @@ Note: Other faces cannot inherit from the cursor face."
:group 'basic-faces)
-(defface underline '((t :underline t))
+(defface underline '((((supports :underline t))
+ :underline t)
+ (((supports :weight bold))
+ :weight bold)
+ (t :underline t))
"Basic underlined face."
:group 'basic-faces)