[nongnu] elpa/git-commit 488ed2ad58 04/15: Use seq-filter instead of -filter

[ELPA Syncer]

branch: elpa/git-commit
commit 488ed2ad58a1c9f372a0de0f78223dd95e2667b5
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    Use seq-filter instead of -filter
---
 lisp/magit-autorevert.el |  4 ++--
 lisp/magit-diff.el       |  4 ++--
 lisp/magit-git.el        | 10 +++++-----
 lisp/magit-gitignore.el  |  8 ++++----
 lisp/magit-patch.el      |  2 +-
 lisp/magit-submodule.el  | 12 ++++++------
 6 files changed, 20 insertions(+), 20 deletions(-)

diff --git a/lisp/magit-autorevert.el b/lisp/magit-autorevert.el
index 28f4573477..68da18fcc7 100644
--- a/lisp/magit-autorevert.el
+++ b/lisp/magit-autorevert.el
@@ -251,8 +251,8 @@ defaults to nil) for any BUFFER."
           (not auto-revert-buffer-list-filter))
       (funcall fn)
     (let ((auto-revert-buffer-list
-           (-filter auto-revert-buffer-list-filter
-                    auto-revert-buffer-list)))
+           (seq-filter auto-revert-buffer-list-filter
+                       auto-revert-buffer-list)))
       (funcall fn))
     (unless auto-revert-timer
       (auto-revert-set-timer))))
diff --git a/lisp/magit-diff.el b/lisp/magit-diff.el
index 1f5e3522b9..233534f154 100644
--- a/lisp/magit-diff.el
+++ b/lisp/magit-diff.el
@@ -1906,8 +1906,8 @@ commit or stash at point, then prompt for a commit."
                       (list (magit-get-section '((staged)   (status)))
                             (magit-get-section '((unstaged) (status))))))
                     ((derived-mode-p 'magit-diff-mode)
-                     (-filter #'magit-file-section-p
-                              (oref magit-root-section children))))))
+                     (seq-filter #'magit-file-section-p
+                                 (oref magit-root-section children))))))
     (if (--any-p (oref it hidden) sections)
         (dolist (s sections)
           (magit-section-show s)
diff --git a/lisp/magit-git.el b/lisp/magit-git.el
index ab1d4f518e..aacdf6ffa5 100644
--- a/lisp/magit-git.el
+++ b/lisp/magit-git.el
@@ -729,9 +729,9 @@ See info node `(magit)Debugging Tools' for more 
information."
              (format " (%s)\n" (magit--safe-git-version))))
     (insert (format "exec-path: %S\n" exec-path))
     (--when-let (cl-set-difference
-                 (-filter #'file-exists-p (remq nil (parse-colon-path
-                                                     (getenv "PATH"))))
-                 (-filter #'file-exists-p (remq nil exec-path))
+                 (seq-filter #'file-exists-p (remq nil (parse-colon-path
+                                                        (getenv "PATH"))))
+                 (seq-filter #'file-exists-p (remq nil exec-path))
                  :test #'file-equal-p)
       (insert (format "  entries in PATH, but not in exec-path: %S\n" it)))
     (dolist (execdir exec-path)
@@ -2807,7 +2807,7 @@ out.  Only existing branches can be selected."
         (progn
           (setq modules (magit-list-module-paths))
           (when predicate
-            (setq modules (-filter predicate modules)))
+            (setq modules (seq-filter predicate modules)))
           (unless modules
             (if predicate
                 (user-error "No modules satisfying %s available" predicate)
@@ -2815,7 +2815,7 @@ out.  Only existing branches can be selected."
       (setq modules (magit-region-values 'magit-module-section))
       (when modules
         (when predicate
-          (setq modules (-filter predicate modules)))
+          (setq modules (seq-filter predicate modules)))
         (unless modules
           (user-error "No modules satisfying %s selected" predicate))))
     (if (length> modules 1)
diff --git a/lisp/magit-gitignore.el b/lisp/magit-gitignore.el
index 5a47fbf8f3..2f60f8c044 100644
--- a/lisp/magit-gitignore.el
+++ b/lisp/magit-gitignore.el
@@ -126,10 +126,10 @@ Rules that are defined in that file affect all local 
repositories."
                    ;; The untracked section of the status buffer lists
                    ;; directories containing only untracked files.
                    ;; Add those as candidates.
-                   (-filter #'directory-name-p
-                            (magit-list-files
-                             "--other" "--exclude-standard" "--directory"
-                             "--no-empty-directory" "--" base)))
+                   (seq-filter #'directory-name-p
+                               (magit-list-files
+                                "--other" "--exclude-standard" "--directory"
+                                "--no-empty-directory" "--" base)))
                   #'string-lessp)))))
     (when default
       (setq default (concat "/" default))
diff --git a/lisp/magit-patch.el b/lisp/magit-patch.el
index 230a18f845..ff246b32c4 100644
--- a/lisp/magit-patch.el
+++ b/lisp/magit-patch.el
@@ -107,7 +107,7 @@ which creates patches for all commits that are reachable 
from
                    range
                  (format "%s~..%s" range range))))
            (let ((args (transient-args 'magit-patch-create)))
-             (list (-filter #'stringp args)
+             (list (seq-filter #'stringp args)
                    (cdr (assoc "--" args)))))))
   (if (not range)
       (transient-setup 'magit-patch-create)
diff --git a/lisp/magit-submodule.el b/lisp/magit-submodule.el
index 7309dabbc9..e640528169 100644
--- a/lisp/magit-submodule.el
+++ b/lisp/magit-submodule.el
@@ -388,12 +388,12 @@ to recover from making a mistake here, but don't count on 
it."
   (magit-with-toplevel
     (when-let
         ((modified
-          (-filter (lambda (module)
-                     (let ((default-directory (file-name-as-directory
-                                               (expand-file-name module))))
-                       (and (cddr (directory-files default-directory))
-                            (magit-anything-modified-p))))
-                   modules)))
+          (seq-filter (lambda (module)
+                        (let ((default-directory (file-name-as-directory
+                                                  (expand-file-name module))))
+                          (and (cddr (directory-files default-directory))
+                               (magit-anything-modified-p))))
+                      modules)))
       (if (member "--force" args)
           (if (magit-confirm 'remove-dirty-modules
                 "Remove dirty module %s"