diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-10-12 16:19:51 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-10-12 16:19:51 +0200 |
| commit | 3c3ea71707d086858c141d141c2ec964d0782a2a (patch) | |
| tree | e4e4a28a5ea338dcc6ac271d9706655fd7a77282 /lisp/mastodon.el | |
| parent | 15c6a842c3e65203eda2d768b6bb828a4235919f (diff) | |
masto-url-p -> fedi-url-p
Diffstat (limited to 'lisp/mastodon.el')
| -rw-r--r-- | lisp/mastodon.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mastodon.el b/lisp/mastodon.el index 04d2fe8..1e6674d 100644 --- a/lisp/mastodon.el +++ b/lisp/mastodon.el @@ -352,7 +352,7 @@ not, just browse the URL in the normal fashion." (thing-at-point-url-at-point) (mastodon-tl--property 'shr-url :no-move) (read-string "Lookup URL: ")))) - (if (not (mastodon--masto-url-p query)) + (if (not (mastodon--fedi-url-p query)) ;; (shr-browse-url query) ; doesn't work (keep our shr keymap) (browse-url query) (message "Performing lookup...") @@ -374,7 +374,7 @@ not, just browse the URL in the normal fashion." (t (browse-url query))))))) -(defun mastodon--masto-url-p (query) +(defun mastodon--fedi-url-p (query) "Check if QUERY resembles a fediverse URL." ;; calqued off https://github.com/tuskyapp/Tusky/blob/c8fc2418b8f5458a817bba221d025b822225e130/app/src/main/java/com/keylesspalace/tusky/BottomSheetActivity.kt ;; thx to Conny Duck! |