diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-10-03 21:35:43 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-10-03 21:35:43 +0200 |
commit | 8ef8da13f6bc287dc301c78d74d12adb406bc67d (patch) | |
tree | d353c78e85b41f4884a6240b1fe673d95a507745 /lisp/help-fns.el | |
parent | 71735be475f0e5e72727c567e7344df805206cd5 (diff) | |
download | emacs-8ef8da13f6bc287dc301c78d74d12adb406bc67d.tar.gz |
Fix typo in last help-fns--insert-menu-bindings change
* lisp/help-fns.el (help-fns--insert-menu-bindings): Fix typo in
last change.
Diffstat (limited to 'lisp/help-fns.el')
-rw-r--r-- | lisp/help-fns.el | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index cbf8ff1f59b..eef895ae88b 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -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) |