diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2022-10-31 11:47:03 +0100 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2022-10-31 11:47:03 +0100 |
| commit | 45a986444101db52dca599f90da7ed063b09d9e8 (patch) | |
| tree | fcf2529480370dadc31a8f7342ac37fc124bed0b /lisp | |
| parent | 996cc9ad7773f7e8d2fc592b69e7d3d3ad2c40de (diff) | |
flycheck requires / thingatpt fun
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mastodon.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/mastodon.el b/lisp/mastodon.el index bc624d9..a5ba9e4 100644 --- a/lisp/mastodon.el +++ b/lisp/mastodon.el @@ -37,6 +37,8 @@ (require 'mastodon-http) (require 'mastodon-toot) (require 'url) +(require 'thingatpt) +(require 'shr) (declare-function discover-add-context-menu "discover") (declare-function emojify-mode "emojify") @@ -279,7 +281,7 @@ 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 - (url-get-url-at-point) + (thing-at-point-url-at-point) (get-text-property (point) 'shr-url) (read-string "Lookup URL: ")))) (if (not (mastodon--masto-url-p query)) |