1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

Make the URL library use records.

* lisp/url/url.el, lisp/url/url-cache.el, lisp/url/url-dav.el,
lisp/url/url-expand.el, lisp/url/url-file.el, lisp/url/url-imap.el,
lisp/url/url-ldap.el: Use `url-p' instead of `vectorp'.

* lisp/url/url-http.el (url-http): Check for type `url' instead of
`vector'.
This commit is contained in:
Lars Brinkhoff 2017-03-21 20:48:52 +01:00
parent 8e6f204f44
commit b6738682ae
8 changed files with 10 additions and 10 deletions

View file

@ -89,7 +89,7 @@ to them."
keep-date &optional msg cont nowait))
(defun url-file-build-filename (url)
(if (not (vectorp url))
(if (not (url-p url))
(setq url (url-generic-parse-url url)))
(let* ((user (url-user url))
(pass (url-password url))