summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/seq.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-10-07 05:00:16 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2019-10-07 05:00:24 +0200
commita5a967b43dd2810635d7a06ea70510c4a8e5c10f (patch)
treedf3db43ca8efc5eb30f82566d4d39940e588ab6e /lisp/emacs-lisp/seq.el
parent7d46b934ab60fdd58c46391636663ff85594c40b (diff)
downloademacs-a5a967b43dd2810635d7a06ea70510c4a8e5c10f.tar.gz
emacs-a5a967b43dd2810635d7a06ea70510c4a8e5c10f.tar.bz2
emacs-a5a967b43dd2810635d7a06ea70510c4a8e5c10f.zip
Make mailcap-prefer-mailcap-viewers work as documented
* lisp/emacs-lisp/seq.el (seq-find): Autoload. * lisp/net/mailcap.el (mailcap-parse-mailcaps): Note where all the entries come from so that we can later distinguish between user values and system values (bug#36771). (mailcap-parse-mailcap): Take a source parameter. (mailcap-possible-viewers): No need to sort wildcards/exact matches; these are later sorted anyway. (mailcap-add-mailcap-entry): Remove `after' parameter. (mailcap-mime-info): Make mailcap-prefer-mailcap-viewers work as documented.
Diffstat (limited to 'lisp/emacs-lisp/seq.el')
-rw-r--r--lisp/emacs-lisp/seq.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/seq.el b/lisp/emacs-lisp/seq.el
index 3413cd1513c..f001dceecec 100644
--- a/lisp/emacs-lisp/seq.el
+++ b/lisp/emacs-lisp/seq.el
@@ -334,6 +334,7 @@ If so, return the first non-nil value returned by PRED."
(throw 'seq--break result))))
nil))
+;;;###autoload
(cl-defgeneric seq-find (pred sequence &optional default)
"Return the first element for which (PRED element) is non-nil in SEQUENCE.
If no element is found, return DEFAULT.