[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/compat c4f10d9326 1/2: Use compat-assoc in compat-alist
From: |
ELPA Syncer |
Subject: |
[elpa] externals/compat c4f10d9326 1/2: Use compat-assoc in compat-alist-get gv-expander |
Date: |
Thu, 14 Apr 2022 10:57:35 -0400 (EDT) |
branch: externals/compat
commit c4f10d932684f234b5516adddda9132bca0c924e
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>
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))