[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-25 71ea138 2/2: * lisp/align.el (align): Simplify a
From: |
Artur Malabarba |
Subject: |
[Emacs-diffs] emacs-25 71ea138 2/2: * lisp/align.el (align): Simplify a lambda |
Date: |
Sun, 03 Jan 2016 18:58:50 +0000 |
branch: emacs-25
commit 71ea138bad3a6bc51106b4ff2f570296069ee4b1
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>
* lisp/align.el (align): Simplify a lambda
---
lisp/align.el | 9 ++++-----
1 files changed, 4 insertions(+), 5 deletions(-)
diff --git a/lisp/align.el b/lisp/align.el
index da8e51c..7e439f3 100644
--- a/lisp/align.el
+++ b/lisp/align.el
@@ -893,11 +893,10 @@ on the format of these lists."
(or exclude-rules
align-mode-exclude-rules-list
align-exclude-rules-list)
- (function
- (lambda (b e mode)
- (when (and mode (listp mode))
- (setq sec-first (min sec-first b)
- sec-last (max sec-last e))))))
+ (lambda (b e mode)
+ (when (consp mode)
+ (setq sec-first (min sec-first b)
+ sec-last (max sec-last e)))))
(if (< sec-first sec-last)
(align-region sec-first sec-last 'entire
(or rules align-mode-rules-list align-rules-list)