aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus@riseup.net>2024-05-02 14:39:13 +0200
committermarty hiatt <martianhiatus@riseup.net>2024-05-02 14:39:13 +0200
commit9dcffebf366e442d6f69240561a5909e8e8f4da0 (patch)
tree0e68a414ac30c84c8dca14adab2e8953dd5fd3ec /lisp
parentff758ff681e4549913998f461ee90562f04ee7e3 (diff)
url-lookup: try shr-url prop before thing-at point
thing at point captures the closing ) of URLs in brackets, which makes webfinger fail. maybe shr-url should always get first dibs before thing-at-point also?
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mastodon.el b/lisp/mastodon.el
index 70ab73c..1d071f7 100644
--- a/lisp/mastodon.el
+++ b/lisp/mastodon.el
@@ -370,8 +370,8 @@ If a status or account is found, load it in `mastodon.el', if
not, just browse the URL in the normal fashion."
(interactive)
(let* ((query (or query-url
- (thing-at-point-url-at-point)
(mastodon-tl--property 'shr-url :no-move)
+ (thing-at-point-url-at-point)
(read-string "Lookup URL: "))))
(if (and (not force)
(not (mastodon--fedi-url-p query)))