From 3f64204c12cb713329e29b7b847875bee9885ba3 Mon Sep 17 00:00:00 2001
From: Stefan Kangas <stefan@marxist.se>
Date: Sun, 26 Dec 2021 02:13:16 +0100
Subject: [PATCH] Make read-multiple-choice-face inherit help-key-binding

* lisp/faces.el (read-multiple-choice-face): Inherit
help-key-binding in addition to underline.
---
 lisp/faces.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/faces.el b/lisp/faces.el
index 39ba0f4d1b5..37fbf155842 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -2963,7 +2963,7 @@ It is used for characters of no fonts too."
   :group 'basic-faces)
 
 (defface read-multiple-choice-face
-  '((t (:inherit underline
+  '((t (:inherit (help-key-binding underline)
         :weight bold)))
   "Face for the symbol name in `read-multiple-choice' output."
   :group 'basic-faces
-- 
2.39.2