From: Mattias Engdegård <mattiase@acm.org>
Date: Tue, 9 Apr 2019 14:56:37 +0000 (+0200)
Subject: Clarify the TESTFN argument to `alist-get'
X-Git-Tag: emacs-27.0.90~3261^2~29
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c81465580fe262f28ce47502c00f4afcbe3b8f8d;p=emacs.git

Clarify the TESTFN argument to `alist-get'

* lisp/subr.el (alist-get):
Rephrase the initial text to clarify the meaning of the TESTFN argument.
It's an equality predicate, not a look-up function (Bug#35206).
---

diff --git a/lisp/subr.el b/lisp/subr.el
index 45b39161965..bdf98979c49 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -779,9 +779,9 @@ Elements of ALIST that are not conses are ignored."
   alist)
 
 (defun alist-get (key alist &optional default remove testfn)
-  "Return the value associated with KEY in ALIST.
+  "Find the first element of ALIST whose `car' equals KEY and return its `cdr'.
 If KEY is not found in ALIST, return DEFAULT.
-Use TESTFN to lookup in the alist if non-nil.  Otherwise, use `assq'.
+Equality with KEY is tested by TESTFN, defaulting to `eq'.
 
 You can use `alist-get' in PLACE expressions.  This will modify
 an existing association (more precisely, the first one if