diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-05-13 15:17:00 -0400 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-05-13 15:45:52 -0400 |
commit | 8fe73515ad08402d16de44b32dc93b98069e0498 (patch) | |
tree | cb01cfe19437af8b628c0172e8234b13eea75275 /lisp/url/url-util.el | |
parent | 967711995ecedc0ed79602ad71af57f45d6a3720 (diff) | |
download | emacs-8fe73515ad08402d16de44b32dc93b98069e0498.tar.gz emacs-8fe73515ad08402d16de44b32dc93b98069e0498.tar.bz2 emacs-8fe73515ad08402d16de44b32dc93b98069e0498.zip |
Make eww understand #fragment URLs at point interactively
* lisp/net/eww.el (eww-suggest-uris): Use
thing-at-point-url-at-point instead of url-get-url-at-point
(bug#31927) because it's much better at guessing what the URL
actually is (especially with #fragments).
Diffstat (limited to 'lisp/url/url-util.el')
-rw-r--r-- | lisp/url/url-util.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/url/url-util.el b/lisp/url/url-util.el index 5b8350642ff..a46e7bb3855 100644 --- a/lisp/url/url-util.el +++ b/lisp/url/url-util.el @@ -543,6 +543,7 @@ This uses `url-current-object', set locally to the buffer." (defun url-get-url-at-point (&optional pt) "Get the URL closest to point, but don't change position. Has a preference for looking backward when not directly on a symbol." + (declare (obsolete thing-at-point-url-at-point "27.1")) ;; Not at all perfect - point must be right in the name. (save-excursion (if pt (goto-char pt)) |