[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 8d88dbd 2/2: Use underline on all terminals that su
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] master 8d88dbd 2/2: Use underline on all terminals that support it |
Date: |
Sat, 06 Feb 2016 03:08:40 +0000 |
branch: master
commit 8d88dbdf9a6f5a85707d6923407b9041f7f0460b
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>
Use underline on all terminals that support it
* lisp/subr.el (read-multiple-choice): Use
display-supports-face-attributes-p instead of
display-graphic-p to determine whether we can use underlining.
---
lisp/subr.el | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/lisp/subr.el b/lisp/subr.el
index 8e430bf..f70f3ed 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -2268,7 +2268,8 @@ Usage example:
(format "[%c] %s" (car elem) name))
;; The prompt character is in the name, so highlight
;; it on graphical terminals...
- ((display-graphic-p)
+ ((display-supports-face-attributes-p
+ '(:underline t) (window-frame))
(setq name (copy-sequence name))
(put-text-property pos (1+ pos)
'face 'read-multiple-choice-face