emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 8ef8da13f6: Fix typo in last help-fns--insert-menu-bindings chang


From: Lars Ingebrigtsen
Subject: master 8ef8da13f6: Fix typo in last help-fns--insert-menu-bindings change
Date: Mon, 3 Oct 2022 15:35:54 -0400 (EDT)

branch: master
commit 8ef8da13f6bc287dc301c78d74d12adb406bc67d
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    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 cbf8ff1f59..eef895ae88 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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]