branch: externals/compat
commit 2577cc74d996620766adf1c9ec8f44ecbac32e79
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
; Whitespace
---
compat-28.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/compat-28.el b/compat-28.el
index 2e89800234..ed05b870b0 100644
--- a/compat-28.el
+++ b/compat-28.el
@@ -519,11 +519,11 @@ as the new values of the bound variables in the recursive
invocation."
(funcall tco-progn (cdr handler))))
(nthcdr 3 expr))))
((eq (car-safe expr) 'and)
- (if (cddr expr)
- (funcall tco `(if ,(cadr expr) ,(cons 'and (cddr expr))))
+ (if (cddr expr)
+ (funcall tco `(if ,(cadr expr) ,(cons 'and (cddr expr))))
(funcall tco (cadr expr))))
- ((eq (car-safe expr) 'progn)
- (cons (car expr) (funcall tco-progn (cdr expr))))
+ ((eq (car-safe expr) 'progn)
+ (cons (car expr) (funcall tco-progn (cdr expr))))
((memq (car-safe expr) '(let let*))
(append (list (car expr) (cadr expr))
(funcall tco-progn (cddr expr))))
