Don't assume url structs are vectors (Bug#27333)

* lisp/url/url-history.el (url-history-update-url): Use `url-p'
instead of `vectorp'.
This commit is contained in:
Noam Postavsky 2017-06-14 20:23:29 -04:00
parent 5d45ba1a05
commit d3a208ea8e

View file

@ -106,7 +106,7 @@ to run the `url-history-setup-save-timer' function manually."
(defun url-history-update-url (url time)
(setq url-history-changed-since-last-save t)
(puthash (if (vectorp url) (url-recreate-url url) url) time
(puthash (if (url-p url) (url-recreate-url url) url) time
url-history-hash-table))
(autoload 'url-make-private-file "url-util")