From: Pip Cet <pipcet@protonmail.com>
Date: Sun, 11 Aug 2024 15:53:39 +0000 (+0000)
Subject: ; * lisp/emacs-lisp/cond-star.el: Fix whitespace.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1bf752bfbab968bbd19e158eb563338334e3f822;p=emacs.git

; * lisp/emacs-lisp/cond-star.el: Fix whitespace.

(cherry picked from commit 643b564bd38cf037c55dba1a160b7d0c4c8355a9)
---

diff --git a/lisp/emacs-lisp/cond-star.el b/lisp/emacs-lisp/cond-star.el
index 77ea2a0b338..fc93d658371 100644
--- a/lisp/emacs-lisp/cond-star.el
+++ b/lisp/emacs-lisp/cond-star.el
@@ -379,7 +379,7 @@ as in `cond*-condition'."
 (defun cond*-bind-pattern-syms (bindings expr)
   "Wrap EXPR in code to bind the BINDINGS.
 This is used for the bindings specified explicitly in match* patterns."
-  ;; They can't have side effects.   Skip them
+  ;; They can't have side effects.  Skip them
   ;; if we don't actually need them.
   (if (equal expr '(progn))
       nil
@@ -708,6 +708,3 @@ That is safe for the purpose this is used for."
       (cons (car args)
             (cond*-un-backquote-list* (cdr args)))
     (mapcar (lambda (x) (list 'quote x)) (cadr (car args)))))
-
-
-