branch: externals/compat
commit c4f10d932684f234b5516adddda9132bca0c924e
Author: Philip Kaludercic <[email protected]>
Commit: Philip Kaludercic <[email protected]>
Use compat-assoc in compat-alist-get gv-expander
Thanks to Jonas Bernoulli for catching this mistake.
---
compat-26.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/compat-26.el b/compat-26.el
index 739a9683ae..92339a97ff 100644
--- a/compat-26.el
+++ b/compat-26.el
@@ -158,7 +158,7 @@ from the absolute start of the buffer, disregarding the
narrowing."
(macroexp-let2 macroexp-copyable-p k key
(gv-letplace (getter setter) alist
(macroexp-let2 nil p `(if (and ,testfn (not (eq ,testfn 'eq)))
- (assoc ,k ,getter ,testfn)
+ (compat-assoc ,k ,getter ,testfn)
(assq ,k ,getter))
(funcall do (if (null default) `(cdr ,p)
`(if ,p (cdr ,p) ,default))
