procyberian/emacs
2
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

Fix typo in last help-fns--insert-menu-bindings change

Browse source 
* lisp/help-fns.el (help-fns--insert-menu-bindings): Fix typo in
last change.
This commit is contained in:
Lars Ingebrigtsen 2022-10-03 21:35:43 +02:00
commit 8ef8da13f6
1 changed files with 10 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

20
lisp/help-fns.el
View file

@ -615,16 +615,16 @@ the C sources, too."
;; Then output them.
(when strings
(when heading
(insert heading)
(seq-do-indexed
(lambda (string i)
(insert
(cond ((zerop i) "")
((= i (1- (length menus))) " and ")
(t ", ")))
(insert (propertize (string-join (nreverse string))
'face 'help-key-binding)))
strings)))))
(insert heading))
(seq-do-indexed
(lambda (string i)
(insert
(cond ((zerop i) "")
((= i (1- (length menus))) " and ")
(t ", "))
(propertize (string-join (nreverse string))
'face 'help-key-binding)))
strings))))
(defun help-fns--compiler-macro (function)
(pcase-dolist (`(,type . ,handler)