branch: externals/consult
commit ea7043381b93f0a5236f8ee3f21f151380a0b0f5
Author: Baptiste <bstrazz...@hotmail.fr>
Commit: GitHub <nore...@github.com>
Fix arguments swapped for `string-suffix-p` (#990)
---
consult.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/consult.el b/consult.el
index 8ff21d7fa4..ad7791703e 100644
--- a/consult.el
+++ b/consult.el
@@ -591,7 +591,7 @@ We use invalid characters outside the Unicode range.")
(setq result
(mapcar
(lambda (x)
- (if (and (string-suffix-p (symbol-name (car-safe x))
"-function") (cdr x))
+ (if (and (string-suffix-p "-function" (symbol-name
(car-safe x))) (cdr x))
(cons (car x) (consult--in-buffer (cdr x)))
x))
result)))
