diff options
| author | Noam Postavsky <npostavs@gmail.com> | 2017-06-14 20:23:29 -0400 |
|---|---|---|
| committer | Noam Postavsky <npostavs@gmail.com> | 2017-06-28 07:39:05 -0400 |
| commit | d3a208ea8e2e3a28fb7d0e30248c7d46e13fc160 (patch) | |
| tree | 63d9ab7b4929c39f6ebdf92954769e847b0aeac9 /lisp | |
| parent | 5d45ba1a05bccc53d52422e867f378a0adeb8970 (diff) | |
| download | emacs-d3a208ea8e2e3a28fb7d0e30248c7d46e13fc160.tar.gz | |
Don't assume url structs are vectors (Bug#27333)
* lisp/url/url-history.el (url-history-update-url): Use `url-p'
instead of `vectorp'.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/url/url-history.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/url/url-history.el b/lisp/url/url-history.el index 1fa085400d8..70a1a0c1441 100644 --- a/lisp/url/url-history.el +++ b/lisp/url/url-history.el @@ -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") |