branch: externals/embark
commit c4889163c8aa4f96af520cefa81d60f7f0048626
Author: Omar Antolín <omar.anto...@gmail.com>
Commit: Omar Antolín <omar.anto...@gmail.com>
Replace cl-constantly with definition (fix #487)
The definition is shorter than the name!
---
embark.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/embark.el b/embark.el
index b7d8e72abb..7bf7bf5c31 100644
--- a/embark.el
+++ b/embark.el
@@ -2723,7 +2723,7 @@ For non-minibuffers, assume candidates are of given TYPE."
(or (embark-collect--metadatum type 'affixation-function)
(let ((annotator
(or (embark-collect--metadatum type 'annotation-function)
- (cl-constantly ""))))
+ (lambda (_) ""))))
(lambda (candidates)
(mapcar (lambda (c)
(if-let (a (funcall annotator c)) (list c "" a) c))
