aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormartianh <martianh@noreply.codeberg.org>2024-10-26 08:38:26 +0000
committermartianh <martianh@noreply.codeberg.org>2024-10-26 08:38:26 +0000
commit25af3a6e9002bb9e1a22ef7f3da7f5007b91a463 (patch)
tree4f5dbbebfbeac40f4ce520346ff12876d7860ffb /lisp
parente8aa0fafb40bbac3a7e5a701e721d9c61cb863d5 (diff)
parent1b60a9ca18927769f30f7133d712d7459e7dd8ab (diff)
Merge pull request 'Use interactive code to select event window' (#590) from rahguzar/mastodon.el:mouse-fix into develop
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon-tl.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 8be802e..5bd1ec1 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -1191,7 +1191,7 @@ Used for hitting RET on a given link."
(defun mastodon-tl--do-link-action (event)
"Do the action of the link at point.
Used for a mouse-click EVENT on a link."
- (interactive "e")
+ (interactive "@e")
(mastodon-tl--do-link-action-at-point (posn-point (event-end event))))
@@ -1586,7 +1586,7 @@ OPTIONS is an alist."
(defun mastodon-tl--click-image-or-video (event)
"Click to play video with `mpv.el'.
EVENT is a mouse-click arg."
- (interactive "e")
+ (interactive "@e")
(mastodon-tl--view-full-image-or-play-video
(posn-point (event-end event))))