[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master e2a7e5f409 1/2: read-multiple-choice: Improve key formatting
From: |
Stefan Kangas |
Subject: |
master e2a7e5f409 1/2: read-multiple-choice: Improve key formatting |
Date: |
Mon, 27 Dec 2021 14:36:11 -0500 (EST) |
branch: master
commit e2a7e5f4097bb128481df781d457c10934f69a0e
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>
read-multiple-choice: Improve key formatting
* lisp/emacs-lisp/rmc.el (rmc--add-key-description): Improve
formatting of key missing in the description. Use face help-key-name
on terminals that can't display underline.
---
lisp/emacs-lisp/rmc.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/emacs-lisp/rmc.el b/lisp/emacs-lisp/rmc.el
index 522d395eba..9d5fe40f9a 100644
--- a/lisp/emacs-lisp/rmc.el
+++ b/lisp/emacs-lisp/rmc.el
@@ -38,10 +38,10 @@
;; Not in the name string, or a special character.
((or (not pos)
(member desc '("ESC" "TAB" "RET" "DEL" "SPC")))
- (format "[%s] %s"
+ (format "%s %s"
(if graphical-terminal
(propertize desc 'face 'read-multiple-choice-face)
- desc)
+ (propertize desc 'face 'help-key-name))
name))
;; The prompt character is in the name, so highlight
;; it on graphical terminals.