diff options
| author | David Edmondson <dme@dme.org> | 2024-01-16 14:00:34 +0000 |
|---|---|---|
| committer | martianh <martianh@noreply.codeberg.org> | 2024-01-26 15:40:58 +0000 |
| commit | f0137a0ad60df4ac8b78020f155e33f733493027 (patch) | |
| tree | 71bd5676c5d69118aebd18c128b335863da626a4 /lisp/mastodon-toot.el | |
| parent | fa73817c225783f09e59f71d8724c62352c36776 (diff) | |
Add 'o' binding to open the current toot in a browser
Diffstat (limited to 'lisp/mastodon-toot.el')
| -rw-r--r-- | lisp/mastodon-toot.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el index 6febec7..bffa20e 100644 --- a/lisp/mastodon-toot.el +++ b/lisp/mastodon-toot.el @@ -517,6 +517,11 @@ base toot." (kill-new url) (message "Toot URL copied to the clipboard."))) +(defun mastodon-toot--open-toot-url () + "Open URL of toot at point." + (interactive) + (browse-url (mastodon-toot--toot-url))) + (defun mastodon-toot--toot-url () "Return the URL of the base toot at point." (let* ((toot (or (mastodon-tl--property 'base-toot) |