branch: elpa/magit
commit c8b40b9bb8448736f20d05f24bbf745ae905cd08
Author: Jonas Bernoulli <[email protected]>
Commit: Jonas Bernoulli <[email protected]>
Use ## and seq-every-p instead of --all-p
---
lisp/magit-section.el | 4 ++--
lisp/magit-sequence.el | 2 +-
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/magit-section.el b/lisp/magit-section.el
index b8a5673cab0..6375e8f7b87 100644
--- a/lisp/magit-section.el
+++ b/lisp/magit-section.el
@@ -2097,8 +2097,8 @@ forms CONDITION can take."
(setq siblings nil)))
(setq sections (nreverse sections))
(and (or (not condition)
- (--all-p (magit-section-match condition it)
- sections))
+ (seq-every-p (##magit-section-match condition
%)
+ sections))
sections))))))))
(defun magit-map-sections (function &optional section)
diff --git a/lisp/magit-sequence.el b/lisp/magit-sequence.el
index 9a3469535d0..8df84f4bc79 100644
--- a/lisp/magit-sequence.el
+++ b/lisp/magit-sequence.el
@@ -727,7 +727,7 @@ START has to be selected from a list of recent commits."
;; merely to add new commits *after* it. Try not to
;; ask users whether they really want to edit public
;; commits, when they don't actually intend to do so.
- (not (--all-p (magit-rev-equal it commit) branches))))
+ (not (seq-every-p (##magit-rev-equal % commit) branches))))
(let ((m1 "Some of these commits have already been published to ")
(m2 ".\nDo you really want to modify them"))
(magit-confirm (or magit--rebase-published-symbol 'rebase-published)
