branch: master
commit ea098ede96bab7ed77d3f39c4fb54ccb2c8ffb46
Author: Teemu Likonen <tliko...@iki.fi>
Commit: Teemu Likonen <tliko...@iki.fi>
Wcheck: Return a closure in --generate-face-predicate
With lexical-binding enabled we can return a real closure function
instead of building a lambda expression.
---
packages/wcheck-mode/wcheck-mode.el | 16 ++++++++--------
1 file changed, 8 insertions(+), 8 deletions(-)
diff --git a/packages/wcheck-mode/wcheck-mode.el
b/packages/wcheck-mode/wcheck-mode.el
index 40bb2e1..5b26989 100644
--- a/packages/wcheck-mode/wcheck-mode.el
+++ b/packages/wcheck-mode/wcheck-mode.el
@@ -1941,15 +1941,15 @@ will return a boolean."
(cond ((not font-lock-mode)
(lambda () t))
((eq mode 'read)
- `(lambda ()
- (wcheck--face-found-p
- ',faces (wcheck--collect-faces
- (match-beginning 1) (match-end 1)))))
+ (lambda ()
+ (wcheck--face-found-p
+ faces (wcheck--collect-faces
+ (match-beginning 1) (match-end 1)))))
((eq mode 'skip)
- `(lambda ()
- (not (wcheck--face-found-p
- ',faces (wcheck--collect-faces
- (match-beginning 1) (match-end 1))))))
+ (lambda ()
+ (not (wcheck--face-found-p
+ faces (wcheck--collect-faces
+ (match-beginning 1) (match-end 1))))))
(t (lambda () t)))))
