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)))