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).
This commit is contained in:
Nobuyoshi Nakada 2022-04-14 15:51:04 +02:00 committed by Lars Ingebrigtsen
parent a9b8ebf34c
commit 36da6ceb92

View file

@ -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)