aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-09-12 14:56:33 +0200
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-09-12 15:05:04 +0200
commit3e404cb392cab584bdf1f73d099ae0dd1c25708f (patch)
tree25fd8f9998a3b77c389a2a5fae42e635ffa98a26 /lisp
parent083b504626fa3540cc7e88a8288b30b9ee7292bc (diff)
url-lookup: shr-browse-url in masto-mode, otherwise browse-url
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/mastodon.el b/lisp/mastodon.el
index 969ab36..72043cf 100644
--- a/lisp/mastodon.el
+++ b/lisp/mastodon.el
@@ -283,7 +283,9 @@ not, just browse the URL in the normal fashion."
(get-text-property (point) 'shr-url)
(read-string "Lookup URL: "))))
(if (not (mastodon--masto-url-p query))
- (browse-url query)
+ (if (equal major-mode 'mastodon-mode)
+ (shr-browse-url query) ;; keep our shr keymap
+ (browse-url query))
(message "Performing lookup...")
(let* ((url (format "%s/api/v2/search" mastodon-instance-url))
(param (concat "resolve=t")) ; webfinger