url-about: Ignore missing directories in load-path
* lisp/url/url-about.el (url-probe-protocols): Ignore missing directories in load-path.
This commit is contained in:
parent
6b14ef273a
commit
74ff6acdd3
1 changed files with 2 additions and 2 deletions
|
@ -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)))))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue