aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/seq.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/seq.el b/lisp/emacs-lisp/seq.el
index 0b99b663ddc..3413cd1513c 100644
--- a/lisp/emacs-lisp/seq.el
+++ b/lisp/emacs-lisp/seq.el
@@ -430,9 +430,9 @@ Equality is defined by TESTFN if non-nil or by `equal' if nil."
430 "Return a list of the elements that appear in SEQUENCE1 but not in SEQUENCE2. 430 "Return a list of the elements that appear in SEQUENCE1 but not in SEQUENCE2.
431Equality is defined by TESTFN if non-nil or by `equal' if nil." 431Equality is defined by TESTFN if non-nil or by `equal' if nil."
432 (seq-reduce (lambda (acc elt) 432 (seq-reduce (lambda (acc elt)
433 (if (not (seq-contains-p sequence2 elt testfn)) 433 (if (seq-contains-p sequence2 elt testfn)
434 (cons elt acc) 434 acc
435 acc)) 435 (cons elt acc)))
436 (seq-reverse sequence1) 436 (seq-reverse sequence1)
437 '())) 437 '()))
438 438