From 45a986444101db52dca599f90da7ed063b09d9e8 Mon Sep 17 00:00:00 2001
From: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Date: Mon, 31 Oct 2022 11:47:03 +0100
Subject: flycheck requires / thingatpt fun

---
 lisp/mastodon.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'lisp')

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))
-- 
cgit v1.2.3