summaryrefslogtreecommitdiff
path: root/lisp/url/url-expand.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/url/url-expand.el')
-rw-r--r--lisp/url/url-expand.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/url/url-expand.el b/lisp/url/url-expand.el
index cc9341bdf5f..9ceaa025fb3 100644
--- a/lisp/url/url-expand.el
+++ b/lisp/url/url-expand.el
@@ -73,7 +73,7 @@ path components followed by `..' are removed, along with the `..' itself."
;; Need to figure out how/where to expand the fragment relative to
(setq default (cond
- ((vectorp default)
+ ((url-p default)
;; Default URL has already been parsed
default)
(default