branch: elpa/git-commit
commit b280fd76250f8caaf1bc7c91800d9a577e017812
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>

    Use compat-assoc-delete-all
---
 lisp/magit-mode.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/lisp/magit-mode.el b/lisp/magit-mode.el
index 4fb0fe42d7..639762ba29 100644
--- a/lisp/magit-mode.el
+++ b/lisp/magit-mode.el
@@ -1413,9 +1413,7 @@ Unless specified, REPOSITORY is the current buffer's 
repository."
   (when-let ((cache (assoc (or repository
                                (magit-repository-local-repository))
                            magit-repository-local-cache)))
-    ;; There is no `assoc-delete-all'.
-    (setf (cdr cache)
-          (cl-delete key (cdr cache) :key #'car :test #'equal))))
+    (setf cache (compat-assoc-delete-all key cache))))
 
 (defmacro magit--with-repository-local-cache (key &rest body)
   (declare (indent 1) (debug (form body)))

Reply via email to