diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-10-20 13:10:59 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-10-20 13:11:04 +0200 |
| commit | a4e7c15484a9330fb9e1a1b425fcf1b37bad04e1 (patch) | |
| tree | 33db809baf378a77d04002d338c291232e12acb7 /lisp/emacs-lisp/seq.el | |
| parent | 0cbcd2869e46f2ede0d08fd183d6c0ad0ebd8394 (diff) | |
| download | emacs-a4e7c15484a9330fb9e1a1b425fcf1b37bad04e1.tar.gz emacs-a4e7c15484a9330fb9e1a1b425fcf1b37bad04e1.tar.bz2 emacs-a4e7c15484a9330fb9e1a1b425fcf1b37bad04e1.zip | |
Preserve breakpoints when Edebug-reinstrumenting functions
* lisp/emacs-lisp/edebug.el (edebug--overlay-breakpoints): New
function (bug#23470).
* lisp/emacs-lisp/seq.el (seq-position): Autoload.
Diffstat (limited to 'lisp/emacs-lisp/seq.el')
| -rw-r--r-- | lisp/emacs-lisp/seq.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/seq.el b/lisp/emacs-lisp/seq.el index f001dceecec..8d4093004a7 100644 --- a/lisp/emacs-lisp/seq.el +++ b/lisp/emacs-lisp/seq.el @@ -380,6 +380,7 @@ Equality is defined by TESTFN if non-nil or by `equal' if nil." (and (seq-every-p (lambda (item1) (seq-contains-p sequence2 item1 testfn)) sequence1) (seq-every-p (lambda (item2) (seq-contains-p sequence1 item2 testfn)) sequence2))) +;;;###autoload (cl-defgeneric seq-position (sequence elt &optional testfn) "Return the index of the first element in SEQUENCE that is equal to ELT. Equality is defined by TESTFN if non-nil or by `equal' if nil." |