diff options
| author | Lars Brinkhoff <lars@nocrew.org> | 2017-03-21 20:48:52 +0100 |
|---|---|---|
| committer | Lars Brinkhoff <lars@nocrew.org> | 2017-04-04 08:23:46 +0200 |
| commit | b6738682ae16c71132c95cd87d48daf598fe89a9 (patch) | |
| tree | 114230b8a5c52886be1741e7e2062b7def9cba61 /lisp/url/url-http.el | |
| parent | 8e6f204f44b6183ba73c7d1bec5841f2b7b8bdd0 (diff) | |
| download | emacs-b6738682ae16c71132c95cd87d48daf598fe89a9.tar.gz | |
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'.
Diffstat (limited to 'lisp/url/url-http.el')
| -rw-r--r-- | lisp/url/url-http.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index 90f2e59cc5b..06d32861b2e 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el @@ -1243,7 +1243,7 @@ Optional arg GATEWAY-METHOD specifies the gateway to be used, overriding the value of `url-gateway-method'. The return value of this function is the retrieval buffer." - (cl-check-type url vector "Need a pre-parsed URL.") + (cl-check-type url url "Need a pre-parsed URL.") (let* (;; (host (url-host (or url-using-proxy url))) ;; (port (url-port (or url-using-proxy url))) (nsm-noninteractive (or url-request-noninteractive |