diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-09-29 17:25:01 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-09-29 17:28:02 +0200 |
commit | b4b4cc98ac271d079916a4c412e134fe5b4ba4d8 (patch) | |
tree | b512da9839cf37fa37322df806406de4297dcc31 /lisp/gnus/gnus-cite.el | |
parent | e457cff3f48b6fc3fe9efc30b9896181c59011da (diff) | |
download | emacs-b4b4cc98ac271d079916a4c412e134fe5b4ba4d8.tar.gz emacs-b4b4cc98ac271d079916a4c412e134fe5b4ba4d8.tar.bz2 emacs-b4b4cc98ac271d079916a4c412e134fe5b4ba4d8.zip |
Revert "Obsolete local set difference functions in favor of seq-difference"
This reverts commit 20f7fa691b7c2859b96550d9ccb326bf394e160d.
gnus-set-difference is orders of magnitude faster than seq-difference
(on these sets), and using seq-difference makes nnimap too
slow.
Diffstat (limited to 'lisp/gnus/gnus-cite.el')
-rw-r--r-- | lisp/gnus/gnus-cite.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-cite.el b/lisp/gnus/gnus-cite.el index 34947cece89..e9c912109e2 100644 --- a/lisp/gnus/gnus-cite.el +++ b/lisp/gnus/gnus-cite.el @@ -839,7 +839,7 @@ See also the documentation for `gnus-article-highlight-citation'." (setq current (car loop) loop (cdr loop)) (setcdr current - (seq-difference (cdr current) numbers #'eq))))))))) + (gnus-set-difference (cdr current) numbers))))))))) (defun gnus-cite-parse-attributions () (let (al-alist) @@ -999,7 +999,7 @@ See also the documentation for `gnus-article-highlight-citation'." loop (cdr loop)) (if (eq current best) () - (setcdr current (seq-difference (cdr current) numbers #'eq)) + (setcdr current (gnus-set-difference (cdr current) numbers)) (when (null (cdr current)) (setq gnus-cite-loose-prefix-alist (delq current gnus-cite-loose-prefix-alist) |