From 8ef8da13f6bc287dc301c78d74d12adb406bc67d Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Mon, 3 Oct 2022 21:35:43 +0200 Subject: [PATCH] Fix typo in last help-fns--insert-menu-bindings change * lisp/help-fns.el (help-fns--insert-menu-bindings): Fix typo in last change. --- lisp/help-fns.el | 20 ++++++++++---------- 1 file 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) -- 2.39.2