master 74ff6acdd3: url-about: Ignore missing directories in load-path

[Stefan Kangas]

branch: master
commit 74ff6acdd36bd005fd2b5585768122ef15d047ed
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    url-about: Ignore missing directories in load-path
    
    * lisp/url/url-about.el (url-probe-protocols): Ignore missing
    directories in load-path.
---
 lisp/url/url-about.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/url/url-about.el b/lisp/url/url-about.el
index 3943cae9e5..a50986d511 100644
--- a/lisp/url/url-about.el
+++ b/lisp/url/url-about.el
@@ -1,6 +1,6 @@
 ;;; url-about.el --- Show internal URLs  -*- lexical-binding: t; -*-
 
-;; Copyright (C) 2001, 2004-2022 Free Software Foundation, Inc.
+;; Copyright (C) 2001-2022 Free Software Foundation, Inc.
 
 ;; Keywords: comm, data, processes, hypermedia
 
@@ -38,7 +38,7 @@
                                  (if (string-match "url-\\(.*\\).el$" f)
                                      (push (match-string 1 f) schemes)))
                                (directory-files d nil "\\`url-.*\\.el\\'")))
-                       load-path)
+                        (seq-filter #'file-exists-p load-path))
                  (put 'url-extension-protocols 'schemes schemes)
                  schemes)))))