From 218624259914e204f73c83a49a631eca8bff5a78 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 17 Jun 2005 14:30:55 +0000 Subject: [PATCH] (underline): Try bold if terminal doesn't support underline. --- lisp/faces.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) 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) -- 2.39.2