From 36d9ccab439817bb3ae308cdf612ef30c47f2391 Mon Sep 17 00:00:00 2001 From: mousebot Date: Fri, 11 Feb 2022 17:32:35 +0100 Subject: put point after a boost/fave marker on success this will leave point on the author-byline, which is where we want it to be, as the marker is not strictly part of the byline, and we are adding info/actions to the author-byline. --- lisp/mastodon-toot.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'lisp/mastodon-toot.el') diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el index b50cbf6..571acd3 100644 --- a/lisp/mastodon-toot.el +++ b/lisp/mastodon-toot.el @@ -200,7 +200,10 @@ Remove MARKER if REMOVE is non-nil, otherwise add it." (unless remove (goto-char bol) (insert (format "(%s) " - (propertize marker 'face 'success))))))) + (propertize marker 'face 'success))))) + ;; leave point after the marker: + (unless remove + (mastodon-tl--goto-next-toot)))) (defun mastodon-toot--action (action callback) "Take ACTION on toot at point, then execute CALLBACK. -- cgit v1.2.3