[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 99fe2a2: Remove side-effect-free markup for assoc-default
From: |
Lars Ingebrigtsen |
Subject: |
master 99fe2a2: Remove side-effect-free markup for assoc-default |
Date: |
Wed, 26 Aug 2020 05:28:42 -0400 (EDT) |
branch: master
commit 99fe2a2643ce67f04a908ffd3fe07746860486f0
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Remove side-effect-free markup for assoc-default
* lisp/subr.el (assoc-default): assoc-default isn't
side-effect-free, because it takes a :test parameter that can do
anything (bug#37943).
---
lisp/subr.el | 1 -
1 file changed, 1 deletion(-)
diff --git a/lisp/subr.el b/lisp/subr.el
index 6603676..08ff38f 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -766,7 +766,6 @@ If that is non-nil, the element matches; then
`assoc-default'
If no element matches, the value is nil.
If TEST is omitted or nil, `equal' is used."
- (declare (side-effect-free t))
(let (found (tail alist) value)
(while (and tail (not found))
(let ((elt (car tail)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 99fe2a2: Remove side-effect-free markup for assoc-default,
Lars Ingebrigtsen <=