From 36da6ceb926b684e4cee5888175924ccd79fac83 Mon Sep 17 00:00:00 2001 From: Nobuyoshi Nakada Date: Thu, 14 Apr 2022 15:51:04 +0200 Subject: [PATCH] Fix electric-help-map problem when help-char has meta-prefix * lisp/ehelp.el (electric-help-map): Fix problem when help-char has meta-prefix (bug#54932). --- lisp/ehelp.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/ehelp.el b/lisp/ehelp.el index 8c1555249ca..0c2f02639fc 100644 --- a/lisp/ehelp.el +++ b/lisp/ehelp.el @@ -76,7 +76,10 @@ (define-key map [?\C-7] 'electric-help-undefined) (define-key map [?\C-8] 'electric-help-undefined) (define-key map [?\C-9] 'electric-help-undefined) - (define-key map (char-to-string help-char) 'electric-help-help) + (define-key map (if (characterp help-char) + (char-to-string help-char) + (vector help-char)) + 'electric-help-help) (define-key map "?" 'electric-help-help) (define-key map " " 'scroll-up) (define-key map [?\S-\ ] 'scroll-down) -- 2.39.5